在考生文件夹下有一个工程文件sjt3.vbp,含有两个窗体,名称分别为Form1、Form2。其中Form1上有两个控件(图像框和计时器)和一个菜单项“操作”,含有三个子菜单(如图1所示)。Form2上有一个名称为Command1、标题为“返回”的命令按钮

admin2016-06-30  37

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

选项

答案步骤1:打开本题工程文件。 步骤2:分析并编写程序代码。 程序提供代码 窗体1的代码 Private Sub nmuOper_Click(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() Picture1.Left=Picture1.Left+100 If Picture1.Left+Picturel.Width>=?Then Picturel.Left=? End If End Sub 窗体2的代码 Private Sub Commandl_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语句退出程序。
转载请注明原文地址:https://kaotiyun.com/show/8eLp777K
0

最新回复(0)