1、国家二级 VB机试（上机操作）模拟试卷 375及答案与解析 一、基本操作题 1 (1)在名称为 Form1的窗体上建立一个二级下拉菜单 (菜单项见表 3 2)，运行时的窗体如图 3-98所示。 注意：存盘时必须存放在考生文件夹下，工程文件名为 sjt1 vbp，窗体文件名为sjtl frm。 (2)在名称为 Form1的窗体上画两个文本框，名称分别为 Text1、 Text2，均无初始内容。要求： 通过属性窗口设置适当的属性，使 Text1、 Text2中显示的文本的字体为 “隶书 ”； 编写适当的事件过程，使得在 Text1中 输入每一个字符时，立即在 Text2中显示 Text1中的内容，
2、如图399所示。 注意：要求程序中不得使用变量，事件过程中只能写一条语句。存盘时必须存放在考生文件夹下，工程文件名为 sjtE vbp，窗体文件名为 sjt2 frm。二、简单应用题 2 (1)考生文件夹下的工程文件 sjt3 vbp中有 2个标题分别是 “产生范文 ”和 “结束 ”的命令按钮： 2个名称分别为 Text1和 Text2，初始值为空的文本框。请再画 1个名称为 Label3、标题为 “正确率 ”的标签，画 1个名称为 Text3、初始内容为空的文本框。效果 如图 3 16所示。程序功能如下： 1)单击 “产生范文 ”命令按钮，则在Text1文本框中随机产生由 20个字母组成的范
3、文。 2)用户可以在 Text2文本框中依照范文输入相应字母，当输入字母达到 20个之后，禁止向 Text2输入内容，且在Text3文本框中显示输入的正确率。 3)单击 “结束 ”命令按钮，则结束程序运行。 请将 “产生范文 ”命令按钮的 Click事件过程，以及 Text2文本框的 KeyPress事件过程中的注释符去掉，把 “?”改为正确内容，以实现上述程序功能。 注意：考生不得修改窗体文件中已经存在的控件和程序 。最后，程序按原文件名存盘。(2)考生文件夹下的工程文件 sjt4 vbp中已经定义了一个学生记录类型数据 StudType。有 3个标题分别为 “准考证号 ”“姓名 ”和 “总
4、分 “的标签； 3个初始内容为空，用于接收准考证号、姓名和总分的文本框Text1、 Text2和 Text3； 1个用于显示提示信恳的标签 Label4。请再画 1个含有 3个命令按钮的控件数组，其名称为 Cmdl，标题分别是 “添加 ”“最高 ”和 “结束 ”。效果如图 3 17所示。 程序功能如下： 1)单击 “添加 ”按钮，则将 Text1、 Text2和 Text3文本框 中输入的准考证号、姓名和总分等学生信息存入自定义的学生记录类型数组 stu中，同时在 Label4中显示已输入的学生人数。最多只能输入 50个学生信息。 2)单击 “最高 ”按钮，则在 3个文本框中显示 “总分 ”最
5、高的学生记录，同时在 Label4中显示该记录的位置。 请将命令按钮控件数组 Cmd1的 Click事件过程中的注释符去掉，把 “?”改为正确的内容，以实现上述程序功能。 注意：考生不得修改窗体文件中已经存在的控件和程序，最后，程序按原文件名存盘。 三、综合应用题 3 在考生目录下有一个工程文件 sjt5 vbp，其 窗体上有两个标签 L1和 L2，标题分别为 “口令 ”和 “允许次数 ”；一个命令按钮 C1，标题为 “确定 “；两个文本框名称分别为 Text1和 Text2。其中 Text1用来输入口令 (输入时，显示 “*”)，无初始内容；Text2的初始内容为 3。并给出了 C1的事件过
6、程，但不完整，要求去掉程序中的注释符，把程序中的 “?”改为正确的内容，使得在运行时，在 Text1中输入口令后，单击 “确定 ”按钮，如果输入的是 “123456”，则在 Text1中显示 “口令正确 “；如果输入其他内容，单击 “确定 ”按钮后，弹出如图 3 151所示的错误提示对 话框，并且Text2中的数字减 1。最多可输入 3次口令，若 3次都输入错误，则禁止再次输入。 注意：不能修改程序中的其他部分。最后把修改后的文件按原文件名存盘。国家二级 VB机试（上机操作）模拟试卷 375答案与解析 一、基本操作题 1 【正确答案】 (1)步骤 1：新建一个 “标准 EXE”工程，打开 VB
7、菜单设计器设计菜单，各菜单项及属性设置如表 4-60所示。步骤 2：按要求将文件保存至考生文件夹中。 (2)步骤 1：新建一个 “标准 EXE”工程，在窗体 Form1中画两个文本框，并分别设置它们的相关属性，其属性及值如表 4 61所示。 步骤 2：打开代码编辑窗口，编写 Text1的 Change事件过程。参考代码： Prvate Sub Text1_Change()Text2 Text=Text1 TextEnd Sub 步骤 3：按要求将文件保存至考生文件夹中。 【试题解析】 (1)本题只需按照要求设计菜单即可。 (2)本题考查考生对文本框控件常用属性和事件的 掌握。要使文本框在初始情
8、况下就没有内容，需在设计时通过属性设置窗口将其 Text属性值设置为空白。要实现程序运行时，在 Text1中输入的任何字符，立即显示在 Text2中的功能，可在Text1的 Change事件过程中，执行将 Text1中显示内容赋值给 Text2的语句。 二、简单应用题 2 【正确答案】 (1)步骤 1：打开考生文件夹中的本题工程文件 sjt3 vbp，在窗体上加入一个标签和文本框，按照表 4 10设置相关属性。步骤 2：打开代码编辑窗口，去掉程序中的注释符 “”，将问号 “?”改为正确的内容。参考 代码：Text1=Text1+sText2 Locked=TrueIf Mid(Text2， i
9、， 1)=Mid(Text1， i，1)Thenm=m+1n=n+1 步骤 3：按要求将文件保存至考生文件夹中。 (2)步骤 1：打开考生文件夹中的本题工程文件 sjt4 vbp，在窗体上加入一个命令按钮数组，按照表 4一 11设置相关属性。步骤 2：在代码编辑窗口中，去掉程序中的注释符 “”，将问号 “?”改为正确的内容。参考代码： Select Case Indexn=n+1 Max=stu(1) Total If stu(j) TotalMax Then maxi=j 步骤 2：按要求将文件保存至考生文件夹中。 【试题解析】 (1)题目要求比较两个文本框内容的相似程度，比较方法是通过循环
10、分别从两个文本框逐个取字母，然后逐个比较，如果相同则正确计数变量 m的加 1，否则错误计数变量 n加 1。循环结束后，便可根据 m和 n的值计算正确率。 (2)题目要求首先在窗体上添加一个命令按钮数组，具体方法是在窗体上添加第一个命令按钮之后，选择该命令按钮，然后使用 “复制 ”和 “粘贴 ”命令或快捷方式，创建第二个命令按钮，系统会提示是否创建控件 数组，选择 “是 ”便完成控件数组的建立，重复一次 “粘贴 ”即可创建第三个命令按钮。 分析程序可知，在 Cmdl的 Click事件处理过程中，首先需要先判断当前点击的是哪一个命令按钮，这可以通过控件数组的 index来来区分。题目要求最多只能输
11、入 50组数据，在第二个 “?”处， If判断如果 n没有超过 50则 n应该加 1，保存当前有多少组数据；在 case 1里面是查找最高的那组数据，使用 For循环来查找，循环的起始条件是 =2，即搜索是从第二组数据开始的，变量 Max记录最高分，而变量 maxi记录最高分出现的位置，因此第 三个 “?”处给 Max变量初始化，即赋值第一组数据的分值；如果当前的分数高于 Max值，则更新 Max和 maxi的值。 三、综合应用题 3 【正确答案】 步骤 1：打开考生文件夹中的本题工程文件 sjt5 vbp，将文本框Text1的 PasswordChar属性值设置为 “*”。 步骤 2：在代码
12、编辑窗口，去掉程序中的注释符 “”，将问号 “?”改为正确的内容。参考代码： If Text1 Text=“123456“Then Text1 PaSSWOrdChar=“ If Text2 Text 0 Then Text1 Enabled=False 步骤 3：按要求将文件保存至考生文件夹中。 【试题解析】 根据题目源程序，判断文本框 Text1输入的密码是否为 “123456”的条件表达式为： Text1 Text=“123456“；要去掉对文本框中输入内容的屏蔽，需将其 PasswordChar属性值清空，即执行语句： Text1 PasswordChar=“；每输入一次错误密码，文本框 Text2中的数字减 1，当文本框 Text2中数值还大于 0时，提示重新输入，否则提示错误，并禁用文本框 Text1。
