窗体如图所示。其中载体汽车图案的是Imagel图形框,直线的名称是Linel,另有一个定时器,名称为Timerl。 已经编写了下面的程序代码: Private Sub Form_Click() Timer1.Enabled=True En

admin2019-04-29  54

问题 窗体如图所示。其中载体汽车图案的是Imagel图形框,直线的名称是Linel,另有一个定时器,名称为Timerl。

已经编写了下面的程序代码:
Private Sub Form_Click()
        Timer1.Enabled=True
End Sub
Private Sub Form_Load()
    Timer1.Enabled=False
    Timer1.Interval=100
End Sub
Private Sub Timer1_Timer()
    If Image1.Left+Imagel.Widh        Image1.Left=Image1.Left+50
    End If
END Sub
关于这个程序,下面的说法中正确的是

选项 A、程序运行时单击窗体,则汽车每隔0.1秒向右移动一次,车头到达右边直线时停止
B、程序一运行,汽车就开始每隔0.1秒向右移动一次,车头到达右边直线时停止
C、程序运行时单击窗体,则汽车每隔0.1秒向右移动一次,车中心到达右边直线时停止
D、程序一运行,汽车就开始每隔0.1秒向右移动一次,车中心到达右边直线时停止

答案A

解析 程序加载时,Form_Load事件被触发。在Form_Load事件中,将计时器设置为"不可用"状态,并将计时器间隔设置为0.1秒;故选项B、D错误。当单击窗体时,Form_Click事件被触发,此时将计时器设置为"可用"状态,当计时器启用时,每隔0.1秒触发一次Form_Timer事件。在Form_Timer事件中,通过if语句判断小汽车车头是否到达右边的直线,如果没有到达,则每隔0.1秒将小汽车向右移动一次,如果到达了右边的直线位置,则停止移动,故选项A正确,选项C错误。本题答案为A。
转载请注明原文地址:https://kaotiyun.com/show/29Up777K
0

随机试题
最新回复(0)