填空题
窗体如图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
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
填空题
在当前目录下有一个名为myfile.txt的文本文件,其中有若干行文本。下面程序的功能是读入此文件中的所有文本行,按行计算每行字符的ASCII码之和,并显示在窗体上。请填空。 Private Sub Command1_Click() Dim ch$, ascii As Integer Open myfile.txt For (11) As #1 While Not EOF(1) Line Input #1, ch ascii=toascii( (12) ) Print ascii Wend Close #1 End Sub Private Function toascii(myStr$) As Integer n=0 For k=1 To (13) n=n+Asc(Mid(myStr,k,1)) Next k toascii=n End Function
点击查看答案&解析
填空题
软件测试可分为白盒测试和黑盒测试。基本路径测试属于______测试。
点击查看答案&解析
相关试题
本程序实现文本加密。先给定序列:a1,a2...