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

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

admin2016-06-30  83
问题 在考生文件夹下有一个工程文件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
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)