模拟试题五及解析.docVIP

模拟试题五及解析 1． 基本操作（2小题，每小题15分，共计30分） 注意：下面出现的“考生文件夹”均为C:\WEXAM********************************************************************** 请根据以下各小题的要求设计Visual Basic应用程序（包括界面和代码）。 (1) 在名称为Form1的窗体上画一个名称为H1的水平滚动条，请在属性窗口中设置它的属性值，满足以下要求：它的最大刻度值为100，最小刻度值为1，在运行时鼠标单击滚动条上滚动框以外的区域（不包括两边按钮），滚动框移动10个刻度。再在滚动条下面画两个名称分别为L1、L2的标签，并分别显示1、100，运行时的窗体如图所示。 *注意： 存盘时必须存放在考生文件夹下，工程文件名为sjt1.vbp，窗体文件名为sjt1.frm。 解析：本题考核的知识点是滚动条控件的的属性（名称、Max、Min）设置及标签的属性设置。要点是设置滚动条控件的LargeChange属性。本题不需要编写事件过程。 本题各个控件的属性设置如下： 控件名 属性 属性值 窗体 名称 Form1 水平滚动条 名称 H1 Max 100 Min 1 LargeChange 10 标签1 名称 L1 Caption 1 标签2 名称 L2 Caption 100 ********************************************************************** (2) 在名称为Form1的窗体上画两个文本框，名称分别为Text1和Text2，均无初始内容；再建立一个下拉菜单，菜单标题为“操作”，名称为M1，此菜单下含有两个菜单项，名称分别为Copy和Clear，标题分别为“复制”、“清除”，请编写适当的事件过程，使得在运行时，单击“复制”菜单项，则把Text1中的内容复制到Text2中，单击“清除”菜单项，则清除Text2中的内容（即在Text2中填入空字符串）。运行时的窗体如图所示。要求在程序中不得使用任何变量，每个事件过程中只能写一条语句。 *注意： 存盘时必须存放在考生文件夹下，工程文件名为sjt2.vbp，窗体文件名为sjt2.frm。 解析：本题考核的知识点是VB菜单编辑器的应用及菜单事件过程的编写。在进行本题操作时，注意主菜单项与子菜单项等级的不同，同时每个菜单项的名称、标题要输入准确。 本题参考代码如下： Private Sub Clear_Click() Text2.Text = End Sub Private Sub Copy_Click() Text2.Text = Text1.Text End Sub 2．简单应用（2小题，每题20分，计40分） 注意：下面出现的“考生目录”均为C:\WEXAM*********************************************************************** (1) 在考生目录下有一个工程文件sjt3.vbp，窗体上已经有一个标签L1，请画一个单选按钮数组，名称为Op1，含三个单选按钮，它们的Index属性分别为0、1、2，标题依次为“飞机”、“火车”、“汽车”，再画一个名称为Text1的文本框。窗体文件中已经给出了Op1的Click事件过程，但不完整，要求去掉程序中的注释符，把程序中的？改为正确的内容，使得在运行时单击“飞机”或“火车”单选按钮时，在Text1中显示“我坐飞机去”或“我坐火车去”，单击“汽车”单选按钮时，在Text1中显示“我开汽车去”，如图所示。 注意： 不能修改程序中的其他部分。最后把修改后的文件按原文件名存盘。 解析：本题考核的知识点是常用控件的属性设置、控件数组的建立与应用、单选按钮数组Click事件过程的编写。本上机题也是给出了一个不完整的程序，残缺的地方用？表示，要求考生在有？的地方补充代码，完善整个程序，最后去掉程序中的注释符。要点同样是要会编写题上要求操作的程序代码，这样才能补充正确的代码。 本题各个控件的属性设置（窗体、标签略）如下表： 控件名 属性 属性值 单选按钮1 名称 Op1 Caption 飞机 Index 0 单选按钮2 名称 Op1 Caption 火车 Index 1 单选按钮3 名称 Op1 Caption 汽车 Index 2 文本框 名称 Text1 Text 本题的参考代码如下： Private Sub Op1_Click(Index As Integer) Dim a As String,