1、国家二级 VB机试（上机操作）模拟试卷 286及答案解析(总分：6.00，做题时间：90 分钟)一、基本操作题(总题数：1，分数：2.00)1.请根据以下各小题的要求设计 Visual Basic应用程序(包括界面和代码)。(1)在名称为 Form1的窗体上画两个标签(名称分别为 lblName和 lblAge，标题分别为“姓名”和“年龄”)、两个文本框(名称分别为txtName和 txtAge，Text 属性均为空白)和一个命令按钮(名称为 cmdDisplay，标题为“显示”)。然后编写命令按钮的 Click事件过程。程序运行后，在两个文本框中分别输入姓名和年龄，然后单击命令按钮，则在窗体
2、上显示两个文本框中的内容，如图 368所示。要求程序中不得使用任何变量。注意：存盘时必须存放在考生文件夹下，工程文件名为 vbsj1vbp，窗体文件名为 vbsj1frm(2)在名称为 Form1的窗体上画一个文本框，名称为 txtInput，无初始内容；再画一个图片框，名称为 picOutput。请编写适当的事件过程，使得在运行时，在文本框中每输入一个字符，就在图片框中输出一行文本框中的完整内容，运行时的窗体如图 369所示。程序中不能使用任何变量。 （分数：2.00）_二、简单应用题(总题数：1，分数：2.00)2.(1)在考生目录下有一个工程文件 vbsj3vbp，窗体上有一个命令按钮
3、cmdNext(标题为“下一个”)。要求：在窗体上建立一个单选按钮数组 optItem，含 4个单选按钮，标题分别为“A”、“B”、“C”、“D”，初始状态下，“A”为选中状态。如图 370所示。窗体文件中已经给出了命令按钮的 Click事件过程，但不完整，请去掉程序中的注释符，把程序中的“?”改为正确的内容，使得每单击命令按钮一次，就选中下一个单选按钮，如果已经选中最后一个单选按钮，再单击命令按钮，则选中第 1个单选按钮。注意：不能修改程序中的其他部分。最后把修改后的文件按原文件名存盘。程序源码：Private Sub cmdNext Click()For k=0To?If optItem(
4、k)Value Thenn=?End IfNext koptItem(n)Value=Falsen=n+1If n=4Thenn=?End IfoptItem(n)Value=TrueEnd Sub(2)在考生文件夹下有一个工程文件 vbsj4vbp，窗体上有两个文本框、三个单选按钮和一个命令按钮。运行时，在txtInput中输入若干个大写和小写字母，并选中一个单选按钮，再单击“转换”按钮，则按选中的单选按钮的标题进行转换，结果放入 txtResult(如图 371所示)。在给出的窗体文件中已经给出了全部控件，但程序不完整，要求：去掉程序中的注释符，把程序中的“?”改为正确的内容。 （分数：2
5、.00）_三、综合应用题(总题数：1，分数：2.00)3.在考生文件夹下有一个工程文件 vbsj5vbp，已给出了部分控件和部分程序。请在窗体上画三个标签，其名称分别为 lblName、lblTel 和 lblPost，标题分别为“姓名”、“电话号码”和“邮政编码”。再画三个文本框，其名称分别为 txtName、txtTel 和 txtPost，初始内容均为空白，如图 372所示。程序运行后，如果单击“显示第三个记录”命令按钮，则读取考生文件夹下 in5txt 文件中的第三个记录，将该记录的三个字段分别显示在三个文本框中(该文件是一个用随机存取方式建立的文件，共有 5个记录)。单击“保存”按钮
6、，则把该记录(三个字段)保存到考生文件夹下的顺序文件 out5txt 中。请编写“显示第三个记录”按钮的 Click事件过程，以实现上述功能。注意：考生不得修改已经存在的程序，必须用“保存”按钮存储结果，否则无成绩。最后，按原文件名把程序存盘。 （分数：2.00）_国家二级 VB机试（上机操作）模拟试卷 286答案解析(总分：6.00，做题时间：90 分钟)一、基本操作题(总题数：1，分数：2.00)1.请根据以下各小题的要求设计 Visual Basic应用程序(包括界面和代码)。(1)在名称为 Form1的窗体上画两个标签(名称分别为 lblName和 lblAge，标题分别为“姓名”和“
7、年龄”)、两个文本框(名称分别为txtName和 txtAge，Text 属性均为空白)和一个命令按钮(名称为 cmdDisplay，标题为“显示”)。然后编写命令按钮的 Click事件过程。程序运行后，在两个文本框中分别输入姓名和年龄，然后单击命令按钮，则在窗体上显示两个文本框中的内容，如图 368所示。要求程序中不得使用任何变量。注意：存盘时必须存放在考生文件夹下，工程文件名为 vbsj1vbp，窗体文件名为 vbsj1frm(2)在名称为 Form1的窗体上画一个文本框，名称为 txtInput，无初始内容；再画一个图片框，名称为 picOutput。请编写适当的事件过程，使得在运行时，
8、在文本框中每输入一个字符，就在图片框中输出一行文本框中的完整内容，运行时的窗体如图 369所示。程序中不能使用任何变量。 （分数：2.00）_正确答案：(正确答案：第 1小题 步骤 1：新建一个“标准 EXE”工程，按表 441在窗体中画出控件并设置其相关属性。 步骤 2：在代码编辑窗口，编写命令按钮的 Click事件过程。 参考代码： Private Sub cmdDisplay_Click() Print txtNameText&“现年“& txtAgeText&“岁“ End Sub 步骤3：按要求将文件保存至考生文件夹中。 第 2小题 步骤 1：新建一个“标准 EXE”工程，按表 44
9、2在窗体中画出控件并设置其相关属性。 )解析：解析：第 1小题：&运算符用来强制两个表达式作字符串连接。本题只需在命令按钮的单击事件过程中，用 Print方法将两个义本框中的内容输出到窗体上。 第 2小题：要实现本题所要求的功能，可在文本框的 Change事件过程中，将当前文奉框中的文本用 Print方法输出到图片框中。二、简单应用题(总题数：1，分数：2.00)2.(1)在考生目录下有一个工程文件 vbsj3vbp，窗体上有一个命令按钮 cmdNext(标题为“下一个”)。要求：在窗体上建立一个单选按钮数组 optItem，含 4个单选按钮，标题分别为“A”、“B”、“C”、“D”，初始状态
10、下，“A”为选中状态。如图 370所示。窗体文件中已经给出了命令按钮的 Click事件过程，但不完整，请去掉程序中的注释符，把程序中的“?”改为正确的内容，使得每单击命令按钮一次，就选中下一个单选按钮，如果已经选中最后一个单选按钮，再单击命令按钮，则选中第 1个单选按钮。注意：不能修改程序中的其他部分。最后把修改后的文件按原文件名存盘。程序源码：Private Sub cmdNext Click()For k=0To?If optItem(k)Value Thenn=?End IfNext koptItem(n)Value=Falsen=n+1If n=4Thenn=?End IfoptIte
11、m(n)Value=TrueEnd Sub(2)在考生文件夹下有一个工程文件 vbsj4vbp，窗体上有两个文本框、三个单选按钮和一个命令按钮。运行时，在txtInput中输入若干个大写和小写字母，并选中一个单选按钮，再单击“转换”按钮，则按选中的单选按钮的标题进行转换，结果放入 txtResult(如图 371所示)。在给出的窗体文件中已经给出了全部控件，但程序不完整，要求：去掉程序中的注释符，把程序中的“?”改为正确的内容。 （分数：2.00）_正确答案：(正确答案：第 1小题 步骤 1：打开考生文件夹中的本题工程文件 vbsj3vbp，按表 443在窗体中用“复制”和“粘贴”命令画出包含
12、 4个元素的单选数组和 1个命令按钮并设置属性。 )解析：解析：第 1小题：本题源程序在命令按钮的单击事件过程中，首先利用 For循环语句(循环变量 k的初值为 0，终值为 3)逐一检查单选按钮数组中的每个元素是否被选中，若选中则用变量 n记录下选中单选按钮的索引号，即 n=k。循环结束后，取消对当前选中单选按钮的选抒，变量 n增 1；接着判断增 1后的 n值是否为 4，荇是则将 n的值设置为 0；最后设置索引号为 n的单选按钮被选中。 第 2小题：本题源程序功能是存命令按钮的单击事件过程中，用 For循环语句和 Mid函数逐一取出文本框 txtInput中的字符后，根据单选按钮的选择进行相应
13、转换；当选择“大小写互换”时，如果是小写字母就用 UCase雨数转换为大写，如果是大写字母就用 LCase函数转换为小写，如果不是字母就不用转换：当选择“全部大写”时，就用 UCase函数将文本框中所有字母转换为大写：当选择“全部小写”时，就用 LCase函数将文本框中所有字母转换为小写。将转换结果显示在文本框 txtResult中。三、综合应用题(总题数：1，分数：2.00)3.在考生文件夹下有一个工程文件 vbsj5vbp，已给出了部分控件和部分程序。请在窗体上画三个标签，其名称分别为 lblName、lblTel 和 lblPost，标题分别为“姓名”、“电话号码”和“邮政编码”。再画三
14、个文本框，其名称分别为 txtName、txtTel 和 txtPost，初始内容均为空白，如图 372所示。程序运行后，如果单击“显示第三个记录”命令按钮，则读取考生文件夹下 in5txt 文件中的第三个记录，将该记录的三个字段分别显示在三个文本框中(该文件是一个用随机存取方式建立的文件，共有 5个记录)。单击“保存”按钮，则把该记录(三个字段)保存到考生文件夹下的顺序文件 out5txt 中。请编写“显示第三个记录”按钮的 Click事件过程，以实现上述功能。注意：考生不得修改已经存在的程序，必须用“保存”按钮存储结果，否则无成绩。最后，按原文件名把程序存盘。 （分数：2.00）_正确答案：(正确答案：步骤 1：打开考生文件夹中的本题工程文件 vbsj5vbp，按表 444在窗体中画出控件并设置其相关属性。 )解析：解析：本题需在“显示第三个记录”按钮的单击事件过程中，先声明一个自定义数据类型 PalType的变量，然后用 Open语句打开文件 in5txt，接着用 Get#语句读出记录号为 3的记录并赋值给白定义类型变量，最后将该变量各元素的值显示在对应文本框中。
