1、国家二级 VB机试（上机操作）模拟试卷 188及答案与解析 一、基本操作题 1 请根据以下各小题的要求设计 Visual Basic应用程序 (包括界面和代码 )。 (1)在名称为 Forml、标题为 “框架 ”的窗体上画一个名称为 Framel，且没有标题的框架。框架内含有两个单选按钮，名称分别为 Optl和 Opt2、标题分别为 “字体 ”、 “大小 ”，如图 2-163所示。 注意：存盘时必须存放在考生文件夹下，工程文件名为sjtl vbo，窗体文件名为 sjtl frm。 (2)考生文件夹下的工程文件 sjt2 vbp中有一个由直 线 Linel、 Line2和 Line3组成的三角形
2、，直线Line1、 Line2和 Line3的坐标值见表 24：要求画一条直线Line4以构成三角形的高，且该直线的初始状态为不可见。再画两个命令按钮，名称分别是 Cmd1、 Cmd2，标题分别为 “显示高 ”、 “隐藏高 ”，如图 2 164所示。请编写适当的事件过程，使得在运行时，单击 “显示高 ”按钮，则显示三角形的高；单击 “隐减高 ”按钮，则隐藏三角形的高。 注意：要求程序中不得使用变量，每个事件过程只能写一条语句。不得修改已经存在的控件，最后将修改后的文件按原文件名存 盘。 二、简单应用题 2 (1)在名称为 FOrml的窗体上画一个名称为 L1的标签，标题为 “口令 ”；画两个文
3、本框，名称分别为 Text1、 Text2，都没有初始内容；再画三个命令按钮，名称分别为 C1、 C2、 C3，标题分别为 “显示口令 ”、 “隐藏口令 ”、 “复制口令 ”，在开始运行时，向 Text1中输入的所有字符，都显示 “*”，单击 “显示口令 ”按钮后，在 Text1中显示所有字符，再单击 “隐藏口令 ”后。 Text1中的字符不变，但显示的郜是 “?”，单击 “复制口令 ”后，把 Text1中的实际内容复制到 Text2中，如图 2 13所示。 要求： 在属性窗口中，把窗体的标题改为 “口令窗口 ”。 建立适当的事件过程，完成上述功能。每个过程中只允许写一条语句，且不能使用变量。
4、 存盘时，工程文件名为 sjt3 vbp，窗体文件名为 sit3 frm。 (2)在名称为 Forml的窗体上画一个名称为 P1的图片框，并利用属性窗口把考生目录中的图标文件 Open ico放到图片框中；再画一个通用对话框控件，名称为 CDl，利用属性窗口设置相应属性，即打开对话框时：标题为 “打开文件 ”，文件类型为 “Word文档 ”，初始目录为 C盘根目录。再编写适当的事件 过程，使得在运行时，单击 P1图片框，可以打开上述对话框。运行后的窗体如图 2 14所示。 注意：存盘时必须存放在考生文件夹下，工程文件名为 sjt4 vbp，窗体文件名为 sjt4 frm。程序中不得使用任何变量
5、。 三、综合应用题 3 在考生文件夹下有一个工程文件 vbsj5 vbp，请先装入该工程文件，然后完成以下操作：在名称为 Forml的窗体上画两个命令按钮，其名称分别为 cmdRead和cmdCal，标题分别为 “读入数据 ”和 “汁算保存 ”(如图 2 42所示 )。程序运行后，如果单击 “跌入数据 ”按钮，则调用题目 所提供的 RcadData1和 ReadData2过程读入in51 txt和 in52 txt文件中的各 20个整数，分别放入 A1和 A2两个数组中，如果单击 “计算保存 ”按钮，则把两个数组中对应下标的元素相减，其结果放入第三个数组中 (即：第一个数组的第 n个元素减去第
6、二个数组的第 n个元素，其结果作为第三个数组的第 n个元素。这里的 n为 1、 2、 、 20)，最后计算第三个数组各元素之和，把所求得的和在窗体上显示出来；并调用题目中给出的 WriteData过程将所求得的和存入考生文件夹下的 0ut5 dat文件中。注意：考生不得修改窗体文件中已经存在的程序，且必须执行此程序一次，最后把修改后的文件以原来的文件名存盘。 国家二级 VB机试（上机操作）模拟试卷 188答案与解析 一、基本操作题 1 【正确答案】 第 1小题 【操作步骤】 步骤 1：新建一个 “标准 EXE”工程，如表386在窗体上绘制控件并设置属性。步骤 2：按要求将文件保存至考生文件夹中
7、。 第 2小题 【操作步骤】 步骤 1：打开本题工程文件 sjt2 vbp，在窗体中画一个直线控件和两个命令按钮，并设置其相火属性如表 3 87所示。步骤 2；打开代码编辑窗 口，编写命令按钮的 Click事件过程。 参考代码： Private Sub Cmdl C1ick() Line4 Visible=True End Sub Private Sub Cmd2一 Click() Line4 Visible： False End Sub 步骤 3：按要求将文件保存下考生文件夹中。 二、简单应用题 2 【正确答案】 第 1小题 【操作步骤】 步骤 1：新建一个 “标准 EXE”工程，如表3-7
8、在窗体中画出控件并设置其相关属性。步骤 2：在代码编辑窗口，分别编写三个按钮的单击事件过程。 参考 代码： Private Sub C1 C1ick() Textl PaSSWOrdChar=“” End Sub Private Sub C2 C1iCk() Textl PasswordChar=”?” End Sub Private Sub C3 CliCk() C3 Parent Text2 Text=Textl Text End Sub Private Sub FormLoad()、 Textl PasswordChar=” ” End Sub 步骤 3：按要求将文件保存至考生文件夹中。
9、 第 2小题 【操作步骤】步骤 1：新建一个 “标准 EXE”工程，如表 3-8在窗体中画出控件并设置其相关属性。步骤 2：打开代码编辑窗口，编写如下事件过程。 参考代码： PriVate Sub PlCliCk() CDI ShowOpen End Sub 步骤 3：按要求将文件保存至考生文件夹中。 注意：打开 “打开文件 ”对话框还可使用语句： cdlOpen Action=1。 三、综合应用题 3 【正确答案】 【操作步骤】 步骤 1：打开考生文件夹中的本题工程文件vbsj5 vbp，按表 3-26在窗体中画出控件并设置其相关 属性。步骤 2：在代码编辑窗口，分别编写 “读入数据 ”按钮
10、和 “计算保存 ”按钮的单击事件过程。 参考代码： Private Sub cmdRead_C1ick() ReadDatal ReadData2 End Sub Private Sub cmdCal CiiCk() Dim Arr3(20)As Integer Dim Sum As Integer Sum=0 For i=1 To 20 Arr3(i)=Arrl(i)一 Arr2(i) Sum=Sum+Arr3(i) Next Print Sum WriteData”OHt5 dat”， Sum End Sub 步骤 3：按键运行程序，先单击 “读入数据 ”按钮，然后单击 “计算保存 ”按钮。 步骤 4：按要求将文件保存至考生文件央中。 【特别提示】为在多个过程中使用同一个变量，应将其声明为窗体变量。
