问答题 在 下有一个工程文件sjt3.vbp,含有两个窗体,名称分别为Form1、Form2。其中Form1上有两个控件(图像框和计时器)和一个菜单项“操作”,含有三个子菜单(如图1所示)。Form2上有一个名称为Command1、标题为“返回”的命令按钮(如图2所示)。要求当单击“窗体2”菜单命令时,Form1隐藏,Form2显示。单击“动画”菜单命令时,使小汽车开始移动,一旦移到窗口的右边界时自动跳到窗体的左边界重新开始移动。单击“退出”菜单命令时,结束程序运行。请去掉程序中的注释符,把程序中的?改为正确的内容。
注意:考生不得修改窗体文件中已经存在的程序。最后程序按原文件名存盘。

图1

【正确答案】
【答案解析】[操作步骤]
步骤1:打开本题工程文件。
步骤2:分析并编写程序代码。
程序提供代码
窗体1的代码
Private Sub mnuOper_Cliek(Index As Integer)
"Select Case?
Case 1
Form2.Show
Form1.Hide
Case 2
"Timer1.Enabled=?
Case 3
End
End Select
End Sub
Private Sub Timer1_Timer()
Pieture1. Left=Picture1. Left+100
"If Picture1. Left+Picture1. Width >=? Then
"Picture1. Left=? End If
End Sub
窗体2的代码
Private Sub Command1_Click()
Form1.Show
Form2.Hide
End Sub
程序结束
第1个?处填入:Index
第2个?处填入:True
第3个?处填入:Form1. Width
第4个?处填入:0
步骤3:调试并运行程序,关闭程序后按题目要求存盘。
答案考生文件夹 [解析] 在计时器的Timer事件过程中,通过设置标签的Left属性值在原有基础上加100来实现自左向右移动的功能。在“动画”菜单项的单击事件过程中应启动计时器,使小汽车开始移动,通过图像框的Left、Width属性和窗体的Width属性判断,小汽车是否移到窗口的右边界,如果是,则设置Picture1的Left属性为0,自动跳到窗体的左边界重新移动。在“窗体2”菜单项的单击事件过程中,通过窗体的Hide、Show方法,隐藏Form1,显示Form2。在“退出”菜单项的单击事件过程中,通过End语句退出程序。