[填空題] 窗體如圖2所示,其中汽車是名稱為Image1的圖像框,命令按鈕的名稱為command1,計時器的名稱為Timer1,直線的名稱為Line1。程序運(yùn)行
[填空題] 窗體如圖2所示,其中汽車是名稱為Image1的圖像框,命令按鈕的名稱為command1,計時器的名稱為Timer1,直線的名稱為Line1。程序運(yùn)行時,單擊命令按鈕,則汽車每0.1s向左移動100,車頭到達(dá)左邊的直線時停止移動。請?zhí)羁胀瓿上旅娴膶傩栽O(shè)置和程序,以便實現(xiàn)上述功能。
①Timer1的Interval屬性的值應(yīng)事先設(shè)置為 (6) 。
②Private Sub Command1_Click()
Timer1.Enabled=True
End Sub
Private Sub Timer1_Timer()
If Image1.Left>= (7) Then
Image1.Left= (8) -100
End lf
End Sub
正確答案:(6)100 (7)Line1.x1或Line1.x2 (8)Image1.Left
參考解析:在Timer1對象的Timer事件里實現(xiàn)汽車的移動,而Timer1的Interval屬性值決定了Timer1觸發(fā)Timer事件的時間間隔,題目要求汽車每0.1s向左移動100,所以時間間隔應(yīng)為100ms,故[6]空處的答案為:100。 在Timer事件里,首先檢查汽車是否已到達(dá)停止位,只有汽車還沒有到達(dá)停止位時才移動汽車,所以移動汽車的條件是:Image1.Left>Line1.X1,所以第[7]空填Line1.X1或Line1.X2(因為豎直線的X1=X2);汽車每次向左移動100,只需在汽車距離左邊界的距離在原有的基礎(chǔ)上減少100即可,所以第[8]空填I(lǐng)mage1.Left,首先取得原有距左邊界的距離,再減少100作為新的左邊界距離。
詞條內(nèi)容僅供參考,如果您需要解決具體問題
(尤其在法律、醫(yī)學(xué)等領(lǐng)域),建議您咨詢相關(guān)領(lǐng)域?qū)I(yè)人士。