窗体如图所示,其中汽车是名称为Imagel的图像框,命令按钮的名称为Command1,计时器的名称为Timer1,直线的名称为Linel。程序运行时,单击命令按钮,则汽车每0.1秒向左移动100,车头到达左边的直线时停止移动。请填空完成下面的属性设置和程序

admin2009-09-28  30

问题 窗体如图所示,其中汽车是名称为Imagel的图像框,命令按钮的名称为Command1,计时器的名称为Timer1,直线的名称为Linel。程序运行时,单击命令按钮,则汽车每0.1秒向左移动100,车头到达左边的直线时停止移动。请填空完成下面的属性设置和程序,以便实现上述功能。
   
1)Timer1的Interval属性的值应事先设置为【  】
2)Private Sub Command1_ Click()
   Timer1. Enabled=True
End Sub

Private Sub Tuner1_Timer()
   If Imagel. Left>【  】 Then
       Image1.Left= 【  】 -100
   End If
End Sub

选项

答案100、Line1.x1或Llne1.x2、Image1.Left

解析 直线控件:直线具有位置属性X1、Y1租X2、Y2,分别表示直线两个端点的坐标,即(X1,Y1)和(X2,Y2)。
图像框:图像框用于在窗体的指定位置显示图形信息。
计时器控件:计时器可以使用Name属性和Enabled属性。其重要的属性是Interval,该属性用来设置计时器事件之间的间隔,以毫秒为单位,取值范围为0~65535,因此其最大时间间隔不能超过65秒。
本题中,题目要求“汽车每0.1秒向左移动100”,可知计时器的Interval属性值为100。图像框相对于窗体的左边距缩小100,即Image1.Left=Image1.Left-100,从“车头到达左边的直线时停止移动”可知,图像框相对于窗体的左边距小于等于直线控件的左边距时,就停止运动,所以第7个空中应填的是直线的水平位置,即Line1.x1或Line1.x2。
转载请注明原文地址:https://jikaoti.com/ti/0Qq0FFFM
0

随机试题
最新回复(0)