1樓：平野川
private sub command1_click()dim ts as integer,tv0 integer, tv1 as integer,ta as integer,tt as integer
tv0=40*1000/3600
tt=2*60
'先化簡，統一各單位 v=40km/h=100/9 m/s ,a = 0.15 m/s, t=120 s
tv1=tv0+ta*tt '由公式v2=v1+at得ts=tv0*tt+ta*(tt)^2/2 '由公式s=v0t+at^2/2得
text1.text=tv1 '2min後速度vtext2.text=ts '距開始點的距離send sub
『必要的話可以進行單位換算
2樓：手機使用者
開始點火車速度為（100/9）/(m/s). 2min後火車速度為（100/9）+（0.15*120)
s=（100/9）/(m/s)*60s+[/2]*120 單位為m
一列火車以初速度v0=2m/s、加速度a=0.5m/s2做勻加速直線運動，則：（1）火車在第3s末的速度是多少？（2）
3樓：幻世萌_小琿
（1）火車在第3s末的速度為：v=v0+at=2+0.5×3m/s=3.5m/s；
（2）火車在前4s內的位移回為答：x＝
vt+12at
＝2×4+1
2×0.5×＝12m；
（3）第5s內的位移為：x
＝vt+12at
?x＝2×5+1
2×0.5×?12＝4.25m；
（4）前8s的位移為：x
＝vt+12at
＝2×8+1
2×0.5×＝32m，
則第二個4s內的位移為：x3=x2-x=32-12=20m；
答：（1）火車在第3s末的速度是3.5m/s；
（2）火車在前4s內的位移是12m；
（3）火車在第5s內的位移是4.25m；
（4）在第2個4s內的位移是20m．
VB程式設計題目,vb程式設計題目
private sub mand1 click dim i as integer,j as integer,k as integer dim a 1 to 10 as integerdim max as integer,min as integer,pj as single dim sumnum a...
vb程式設計問題，VB程式設計問題
private sub command1 click text1 for i 1 to 45 7 for j 1 to 45 6 2for k 1 to 45 3 5if i j 2 k 5 45 thenn n 1 end if next next next text1 n end sub pri...
VB程式設計問題，VB程式設計難嗎？
非常簡單，你看插圖，一切都在圖中。如下 在窗體中新增一個label1 兩個預設command1和command2。一切屬性預設 不用修改。private sub command1 click if command1.caption 有邊框 then label1.borderstyle 1 comm...