1、国家二级 VB机试（上机操作）模拟试卷 396及答案与解析 一、基本操作题 1 请根据以下各小题的要求设计 Visual Basic应用程序 (包括界面和代码 )。 (1)在名称为 Form1的窗体上画一个标签，其名称为 Labe11，标题为 “等级考试 ”，BorderStyle属性为 1，可以根据标题自动调整大小；然后再画一个命令按钮，其名称和标题均为 Command1，编写适当的事件过程。程序运行后，其界面如图 3127(a)所示，此时如果单击命令按钮，则标签消失，同时用标签的标题作为命令按钮的标题，如图 3127(b)所示。注意：存盘时必须存放在考生文件夹下，工程文件名为 sjt1 v
2、bp，窗体文件名为sjt1 frm。 (2)在名称为 Form1的窗体上画一个文本框，其名称为 Text1，初始内容为空白；然后再画三个单选按钮，其名称分别为 Op1、 Op2和 Op3，标题分别为北京、西安和杭州，编写适当的事件过程。程序运行后，如果选择单选按钮 Op1，则在文本框中显示 “颐和园 ”；如果选择单选按钮 Op2，则在文本框中显示 “兵马俑 ”；如果选择单选按钮 Op3，则在文本框中显示 “西湖 ”。程序的运行情况如图3128所示。要求程序中不得 使用变量，事件过程中只能写一条语句。注意：存盘时必须存放在考生文件夹下，工程文件名为 sjt2 vbp，窗体文件名为 sjt2 fr
3、m。 二、简单应用题 2 (1)在考生文件夹下有一个工程文件 sjt3 vbp，相应的窗体文件为 sjt3 frm。在窗体上有一个名称为 Command1、标题为 “计算 ”的命令按钮；两个水平滚动条，名称分别为 Hscrol11和 Hserol12，其 Max属性均为 100， Min属性均为 1；四个标签，名称分别为 Labe11、 Labe12、 Labe13和 Labe14，标题分别为 “运算数 1”、 “运算数 2”、 “运算结果 ”和空白；此外还有一个包含四个单选按钮的控件数组，名称为 Option1，标题分别为 “ ”、 “ ”、 “*和 “ ”，如图 3129(a)所示。程序运
4、行后，移动两个滚动条中的滚动框，用滚动条的当前值作为运算数，如果选中一个单选按钮，然后单击计算按钮，相应的计算结果将显示在 Labe14中，程序运行情况如图 3129所示。这个程序不完整，请把它补充完整，并能正确运行。要求：去掉程序中的注释符，把程序中的 ?改为正确的内容，使其能正确运行，但不能修改程序中的其他部分，也不能修改控件的 属性。最后用原来的文件名保存工程文件和窗体文件。 (2)在考生文件夹下有一个工程文件 sjt4 vbp，相应的窗体文件为 sjt4 frm。在窗体上有一个命令按钮，其名称为 Command1，标题为 “输入显示 ”；此外还有一个文本框，其名称为 Text1，初始内
5、容为空白。程序的功能是，程序运行后，单击命令按钮，显示输入对话框，在对话框中输入某个月份的数值 (1 12)，然后单击 “确定 ”按钮，即可在文本框中输出该月份所在的季节。例如输入 5，将输出 “5月份是夏季 ”，如图 3130所示。程序不完整，请补充完整。要求：去 掉程序中的注释符，把程序中的 “?”改为正确的内容，使其能正确运行，但不能修改程序中的其他部分。最后用原来的文件名保存工程文件和窗体文件。 三、综合应用题 3 在考生的文件夹下有一个工程文件 sjt5 vbp，相应的窗体文件为 sjt5 frm。在窗体上有两个命令按钮，其名称分别为 Command1和 Command2，标题分别为
6、 “写文件 “和 “读文件 ”，如图 3131(a)所示。其中 “写文件 ”命令按钮事件过程用来建立一个通信录，以随机存取方式保存到文件 t5 txt中；而 “读文件 ”命令按钮事件过程用来读出文件 t5 txt中的每个记录，并在窗体上显示出来。通信录中的每个记录由三个字段组成，结构如下： 姓名 (Name) 电话 (Tel) 邮政编码 (Pos) LiuMingliang(010)62781234 100082 各字段的类型和长度为： 姓名 (Name)：字符串15 电话 (Tel)：字符串 15 邮政编码 (Pos)：长整型 (Long) 程序运行后，如果单击 “写文件 “命令按钮，则可以
7、随机存取方式打开文件 t5 txt，并根据提示向文件中添加记录，每写入一个记录后，都要询问是否再输入新记录，回答 “Y”(或 “y”)则输入新记录，回答 “N”(或 “n”)则停止输入；如果单击 “读文件 ”命令按钮，则可以随机存取方式打开文件 t5 txt，读出文件中的全部记录，并在窗体上显示出来，如图 3131(b)所示。该程序不完整，请把它补充完整。要求如下： 去掉程序中的注释符，把程序中的 ?改为正确内容，使其能正确运行，但不能修改程序中的其他部分。 文件 t5 txt中已有三个记录，如图 3131(b)所示，请运行程序，单击 “写文件 ”命令按钮，向文件 t5 txt中添加以下两个记
8、录 (全部采用西文方式 )： LiDaqing (027)873487654 30065 ChenQingshan(022)26874321 300120 运行程后，单击 “读文件 ”命令按钮，在窗体上显示全部记录 (共 5个 )。 用原来的文件名保存工程文件和窗体文件。国家二级 VB机试（上机操作）模拟试卷 396答案与解析 一、基本操作题 1 【正确答案】 (1)【操作步骤】 步骤 1：新建一个 “标准 EXE”工程，如表 475在窗体中画出控件并设置其相关属性。步骤 2：在代码编辑窗口编写以下事件过程。参考代码： Private Sub Command1_Click()Command1
9、Caption Labe11Labe11 ViSible FalSeEnd Sub 步骤 3：按要求将文件保存至考生文件夹中。 (2)【操作步骤】 步骤 1：新建一个 “标准 EXE”工程，在窗体 Form1上画一个文本框和三个单选按钮，其属性及值如表476所示。 步骤 2：在代码编辑窗口，编写三个单选按钮的单击事件过程。参考代码： Private Sub Op1_Click()Text1 “颐和园 “End SubPrivate Sub Op2_Click()Text1 Text “兵马俑“End Subrivate Sub Op3_Click()Text1 Text “西湖 “End Su
10、b 步骤 3：按要求将文件保存至考生文件夹中。 二、简单应用题 2 【正确答案】 (1)【操作步骤】 步骤 1：打开考生文件夹中的本题工程文件 sjt3 vbp，在代码编辑窗口，去掉程序中的注释符 “”，将问号 “?”改为正确的内容。参考代码： If Optionl(i) True Then elect Case opt Labe14 Caption Str(Hsb1 Value) “ “ opt Str(Hsb2 Value) “ “ Str(Result) 步骤 2：按要求将文件保存至考生文件夹中。 (2)【操作步骤】 步骤 1：打开考生文件夹中的本题工程文件 sjt4 vbp，在代码编辑
11、窗口，去掉程序中的注释符 “”，将问号 “?”改为正确的内容。参考代码： Loop Unti1 n 0 And n 13 Select Case n Select Case m 步骤 2：按要求将文件保存至考生文件夹中。 三、综合应用题 3 【正确答案】 【操作步骤】 步骤 1：打开考生文件夹中的本题工程文件 sjt5 vbp，在代码编辑 窗口，去掉程序中的注释符 “”，将问号 “?”改为正确的内容。参考代码： RecNum RecNum 1 Put#1， RecNum， Pers Loop While UCase(asp) “N“ RecNum LOF(1) Len(Pers) Get#1， i， Pers 步骤 2：按 键运行程序，先单击 “写文件 ”按钮，然后在弹出的输入框中依次按照题目要求输入两条记录，再单击 “读文件 ”按钮在窗体上显示结果。 步骤 3：按要求将文件保存至考生文件夹中。
