![[填空题] 窗体如图所示，其中汽车是名称为Imagel的图像框，命令按钮的名称为Command1，计时器的名称为Timer1，直线的名称为Line1。程序运行时，单击命令按钮，则汽车每0.1秒向左移动,第1张](/aiimages/%5B%E5%A1%AB%E7%A9%BA%E9%A2%98%5D+%E7%AA%97%E4%BD%93%E5%A6%82%E5%9B%BE%E6%89%80%E7%A4%BA%EF%BC%8C%E5%85%B6%E4%B8%AD%E6%B1%BD%E8%BD%A6%E6%98%AF%E5%90%8D%E7%A7%B0%E4%B8%BAImagel%E7%9A%84%E5%9B%BE%E5%83%8F%E6%A1%86%EF%BC%8C%E5%91%BD%E4%BB%A4%E6%8C%89%E9%92%AE%E7%9A%84%E5%90%8D%E7%A7%B0%E4%B8%BACommand1%EF%BC%8C%E8%AE%A1%E6%97%B6%E5%99%A8%E7%9A%84%E5%90%8D%E7%A7%B0%E4%B8%BATimer1%EF%BC%8C%E7%9B%B4%E7%BA%BF%E7%9A%84%E5%90%8D%E7%A7%B0%E4%B8%BALine1%E3%80%82%E7%A8%8B%E5%BA%8F%E8%BF%90%E8%A1%8C%E6%97%B6%EF%BC%8C%E5%8D%95%E5%87%BB%E5%91%BD%E4%BB%A4%E6%8C%89%E9%92%AE%EF%BC%8C%E5%88%99%E6%B1%BD%E8%BD%A6%E6%AF%8F0.1%E7%A7%92%E5%90%91%E5%B7%A6%E7%A7%BB%E5%8A%A8.png "[填空题] 窗体如图所示，其中汽车是名称为Imagel的图像框，命令按钮的名称为Command1，计时器的名称为Timer1，直线的名称为Line1。程序运行时，单击命令按钮，则汽车每0.1秒向左移动,第1张")
[填空题] 窗体如图所示，其中汽车是名称为Imagel的图像框，命令按钮的名称为Command1，计时器的名称为Timer1，直线的名称为Line1。程序运行时，单击命令按钮，则汽车每0.1秒向左移动100，车头到达左边的直线时停止移动。请填空完成下面的属性设置和程序，以便实现上述功能。
①Timer1的Interval属性的值应事先设置为 (8) 。
②Private Sub Command1_Click()
Timer1.Enabled=True
End Sub
Private Sub Timer1_Timer()
If Image1.Left＞=Line1.x1 Then
Image1.Left= (9) -100
End If
End Sub
正确答案：100
欢迎分享，转载请注明来源：内存溢出
微信扫一扫
支付宝扫一扫
评论列表（0条）