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 updatestat if list1.listcount 1 thencommand1.enabled falsecommand2.enabled falseelse command1.enabled truecommand2.enabled t...
VB程式設計，vb程式設計是什麼？
完成的程式 dim h as integer,m as integer,s as integer private sub form load label1.fontsize 48 h hour time m minute time s second time timer1.interval 1000...
VB程式設計高手進， 急 VB程式設計高手進
很簡單的 只告訴你方法思路，現在沒有vb環境所以沒法寫你在text1的keypress時間裡，寫上校驗方法，利用acciss碼來判斷，數字的acciss碼是連續的，你可以查到，除此之外的acciss碼你都不予接受，這樣使用者就無法輸入除了0 9之外的任何內容，如何輸入了，你還可以彈出提示框。思路就這...