[單項選擇題] 窗體的左右兩端各有1條直線,名稱分別為Line1、Line2;名稱為Shape1的圓靠在左邊的Line1直線上(見圖);另有1個名稱為Timer
[單項選擇題] 窗體的左右兩端各有1條直線,名稱分別為Line1、Line2;名稱為Shape1的圓靠在左邊的Line1直線上(見圖);另有1個名稱為Timer1的計時器控件,其Enabled屬性值是True。要求程序運行后,圓每秒向右移動100,當(dāng)圓遇到 Line2時則停止移動。為實現(xiàn)上述功能,某人把計時器的Interval屬性設(shè)置為1000,并編寫了如下程序:Private SubTimer1_Timer()For k=Line1.X1 To Line2.X1 Step 100If Shape1.Left+Shape1.Width<Line2.X1 ThenShape1.Left=Shape1.Left+100End IfNext kEnd Sub運行程序時發(fā)現(xiàn)圓立即移動到了右邊的直線處,與題目要求的移動方式不符。為得到與題目要求相符的結(jié)果,下面修改方案中正確的是
A .把計時器的Interval屬性設(shè)置為1
B .把For k=Line1.X1 To Line2.X1 Step 100和Next k兩行刪除
C .把For k=Line1.X1 To Line2.X1 Step 100改為For k=Line2.X1 To Line1.X1 Step 100
D .把If Shape1.Left+Shape1.Width<Line2.X1 Then改為If Shape1.Left<Line2.X1 Then
正確答案:B
參考解析:Timer1中用了一個循環(huán),只要圓沒有到最右邊的直線Line2處,這個圓就會一直向右移動。但因為Timer1中本來已經(jīng)通過設(shè)置Interval屬性來控制循環(huán),Timer事件中的循環(huán)重復(fù)了,所以答案為B) 。
詞條內(nèi)容僅供參考,如果您需要解決具體問題
(尤其在法律、醫(yī)學(xué)等領(lǐng)域),建議您咨詢相關(guān)領(lǐng)域?qū)I(yè)人士。