[填空题] 窗体如图2所示，其中汽车是名称为Image1的图像框，命令按钮的名称为command1，计时器的名称为Timer1，直线的名称为Line1。程序运行时，单击命令按钮，则汽车每0.1s向左移

[填空题] 窗体如图2所示，其中汽车是名称为Image1的图像框，命令按钮的名称为command1，计时器的名称为Timer1，直线的名称为Line1。程序运行时，单击命令按钮，则汽车每0.1s向左移动100，车头到达左边的直线时停止移动。请填空完成下面的属性设置和程序，以便实现上述功能。



①Timer1的Interval属性的值应事先设置为 (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事件里实现汽车的移动，而Timer1的Interval属性值决定了Timer1触发Timer事件的时间间隔，题目要求汽车每0.1s向左移动100，所以时间间隔应为100ms，故[6]空处的答案为：100。 在Timer事件里，首先检查汽车是否已到达停止位，只有汽车还没有到达停止位时才移动汽车，所以移动汽车的条件是：Image1.Left＞Line1.X1，所以第[7]空填Line1.X1或Line1.X2(因为竖直线的X1=X2)；汽车每次向左移动100，只需在汽车距离左边界的距离在原有的基础上减少100即可，所以第[8]空填Image1.Left，首先取得原有距左边界的距离，再减少100作为新的左边界距离。