2012年计算机二级VB第二十三套上机试题及解析.doc

更多试题请访问下载 1. 基本操作（2小题，每小题15分，共计30分） 　　注意：下面出现的“考生文件夹”均为%USER% 　　请根据以下各小题的要求设计Visual Basic应用程序（包括界面和代码）。 　　（1）在名称为Form1的窗体上画一个名称为H1的水平滚动条，请在属性窗口中设置它的属性值，满足以下要求：它的最大刻度值为100，最小刻度值为1， 在运行时鼠标单击滚动条上滚动框以外的区域（不包括两边按钮），滚动框移动10个刻度。再在滚动条下面画两个名称分别为L1、L2的标签，并分别显示1、100 ，运行时的窗体如图所示。 　　*注意： 　　存盘时必须存放在考生文件夹下，工程文件名为sjt1.vbp，窗体文件名为sjt1.frm。 　　解题思路： 　　启动Visual Basic系统，创建一个Form1窗体。 　　在该窗体上画一个水平滚动条控件，通过其属性窗口将名称设为H1，Min属性设为1，Max属性设为100，LargeChang属性设为10。画二个标签控件，通过其属性窗口将名称分别设为L1、L2，标题（Caption属性）分别设为1、100。 　　参考文件：c:\wexamhlpsys\参考答案\sjt1.vbp、sjt1.frm、sjt1.vbw 　　请把这些文件复制到c:\wexam，然后打开sjt1.vbp文件并运行。 　　（2）在名称为Form1 的窗体上画两个文本框，名称分别为Text1和Text2，均无初始内容；再建立一个下拉菜单，菜单标题为“操作”，名称为M1，此菜单下含有两个菜单项，名称分别为Copy 和Clear，标题分别为“复制”、“清除”，请编写适当的事件过程，使得在运行时，单击“复制”菜单项，则把Text1中的内容复制到Text2中，单击“清除”菜单项，则清除Text2中的内容（即在Text2中填入空字符串）。运行时的窗体如图所示。要求在程序中不得使用任何变量，每个事件过程中只能写一条语句。 　　*注意： 　　存盘时必须存放在考生文件夹下，工程文件名为sjt2.vbp，窗体文件名为sjt2.frm。 　　解题思路： 　　启动Visual Basic系统，创建一个Form1窗体。 　　在该窗体上画二个文本框控件，通过其属性窗口将名称分别设为Text1、Text2，文本内容（Text属性）均设为空。通过菜单编辑器建立一个主菜单，在菜单编辑器的标题处输入“操作”，名称处输入M1，在该菜单下有二个子菜单，在菜单编辑器的标题处分别输入“复制”、“清除”，名称处分别输入Copy和Clear。 　　单击“操作”菜单中的“复制”命令（即运行Click事件过程），在该Click事件过程中加入语句： 　　Private Sub copy_Click() 　　Text2 = Text1 　　End Sub 　　单击“操作”菜单中的“清除”命令（即运行Click事件过程），在该Click事件过程中加入语句： 　　Private Sub clear_Click() 　　Text2 = 　　End Sub 　　参考文件：c:\wexamhlpsys\参考答案\sjt2.vbp、sjt2.frm、sjt2.vbw 　　请把这些文件复制到c:\wexam，然后打开sjt1.vbp文件并运行。 2. 简单应用（2小题，每题20分，计40分） 　　注意：下面出现的“考生文件夹”均为%USER% 　　（1）在考生目录下有一个工程文件sjt3.vbp，窗体上已经有一个标签Label1，请画一个单选按钮数组，名称为Op1，含三个单选按钮，它们的Index属性分别为0、1、2， 标题依次为“飞机”、“火车”、“汽车”，再画一个名称为Text1的文本框。窗体文件中已经给出了Op1的Click事件过程， 但不完整，要求去掉程序中的注释符，把程序中的？改为正确的内容，使得在运行时单击“飞机”或“火车”单选按钮时，在Text1 中显示“我坐飞机去”或“我坐火车去”，单击“汽车”单选按钮时，在Text1 中显示“我开汽车去”，如图所示。 　　注意： 　　不能修改程序中的其他部分。最后把修改后的文件按原文件名存盘。 　　解题思路： 　　启动Visual Basic系统，打开考生文件夹下需编辑的工程文件sjt3.vbp，相应的窗体文件名为sjt3.frm。 　　由于所提供的窗体控件不完整，在该窗体上需画一个单选按钮控件，通过对单选按钮控件的复制产生单选按钮控件数组，共有三个单选按钮，通过其属性窗口将名称设为Op1，Index属性分别设为0、1、2，按顺序将其标题（Caption属性）分别设为“飞机”、