1、国家二级 VB机试（上机操作）模拟试卷 16及答案与解析 一、基本操作题 1 请根据以下各小题的要求设计 Visual Basic应用程序 (包括界面和代码 )。在名称为Forml的窗体上建立一个名称为 Opl的单选按钮数组，含三个单选按钮，它们的标题依次为 ”选择 1”、 ”选择 2”、 ”选择 3”，其下标分别为 0、 1、 2，初始状态下， ”选择 2”为选中状态。运行后的窗体如图 2-100所示。 注意：存盘时必须存放在考生文件夹下，工程文件名为 sjtl vbp，窗体文件名为 sjtl frm。 2 在窗体上建立一个二级菜单，第 一级含两个菜单项，标题分别为 ”编辑 ”、 ”帮助 ”
2、，名称分别为 edit、 help。其中 ”编辑 ”菜单含有子菜单，共有三个菜单项，其标题依次为 ”剪切 ”、 ”复制 ”、 ”粘贴 ”，名称分别为 ”cut”、 ”copy”、 ”paste”(如图2 101所示 )。注意：存盘时必须存放在考生文件夹下，工程文件名为 sjt2 vbp，窗体文件名为 sjt2 frm。 二、简单应用题 3 在考生文件夹下有一个工程文件 sjt3 vbp，它的功能是在运行时只显示名为Form2的窗体，单击 Form2上的 ”C2”按钮，则显示名为： Forml的窗 体；单击Forml上的 ”Cl”按钮，则 Forml的窗体消失。这个程序并不完整，要求如下： 把F
3、orm2设为启动窗体；把 Forml上按钮的标题改为 ”隐藏 ”，把 Form2上按钮的标题改为 ”显示 ”。 去掉程序中的注释符，把程序中的 ?改为正确的内容，使其实现上述功能，但不能修改程序中的其他部分。最后把修改后的文件存盘。 工程文件和窗体文件仍以原来的文件名存盘。正确程序运行后的界面如图 2-102所示。4 在考生文件夹下有一个工程文件 sjt4 vbp，它的功能是在文本框中输入一个整数，单击 ”移动 ”按钮后，如果输入 的是正数，滚动条中的滚动框向右移动与该数相等的刻度，但如果超过了滚动条的最大刻度，则不移动，并且显示 ”文本框中的数值太大 ”；如果输入的是负数，滚动条中的滚动框向
4、左移动与该数相等的刻度，但如果超过了滚动条的最小刻度，则不移动，并且显示 ”文本框中的数值太小 ”，如图2-103所示。要求：去掉程序中的注释符，把程序中的 ?改为正确的内容，使其实现上述功能，但不能修改程序中的其他部分，也不能修改控件的属性。最后把修改后的程序以原来的文件名存盘。 三、综合应用题 5 在名称为 Forml的窗体上画一个文本框，名称为 Textl，允许多行显示；再画三个命令按钮，名称分别为 Cl、 C2、 C3，标题分别为 ”输入 ”、 ”转换 ”、 ”存盘 ”(如图2-104所示 )。请编写适当的事件过程，使得在运行时，单击 ”输入 ”按钮，则从考生文件夹中读入 in5 tx
5、t文件 (文件中只有字母和空格 )，放入 Textl中；单击 ”转换 ”按钮，则把 Textl中的所有小写字母转换为大写字母；单击 ”存盘 ”按钮，则把 Textl中的内容存入 out5 txt文件中。注意：考生必须把转换后的内容用 ”存盘 ”按钮存入 out5 txt文件，否则无成绩。考生的工程文件以文件名 sjt5 vbp存盘，窗体文件以文件名 sjt5 frm存盘。 国家二级 VB机试（上机操作）模拟试卷 16答案与解析 一、基本操作题 1 【正确答案】 步骤 1：新建一个 ”标准 EXE”工程。步骤 2：在窗体： Forml中加入一个单选按钮，并用 ”复制 ”和 ”粘贴 ”的方法，生成
6、包含 4个元素的单选按钮数组。步骤 3：分别设置单选按钮数组中各元素的相关属性，其属性及值如表 3-56所示。 步骤 4：按要求将文件保存至考生文件夹中。 2 【正确答案】 步骤 1：新建一个 ”标准 EXE”工程，利用菜单设计器如表 3 57在窗体上建立一个二级菜单。 步骤 2：按要求将文件保存至考生文件夹中。 二、简单应用题 3 【正确答案】 步骤 1：打开考生文件夹下的本题工程文件 sjt3 vbp，然后将按钮 C1的 Caption属性设置为 ”隐藏 ”，将按钮 C2的 Caption属性设置为 ”显示 ”。 步骤 2：选择 工程 工程属性 命令，打开 ”工程属性 ”对话框，设置 Fo
7、rm2为启动窗体。 步骤 3：打开 Form2和 Form1的代码编辑窗口，去掉程序中的注释符 ”“， 将问号 ”?”改为正确的内容。 参考代码： Private Sub C1_Cl ick( ) Forml Visible=False End Sub Private Sub C2_Click( ) Forml Visible=True End Sub 步骤 4：按要求将文件保存至考生文件夹中。 4 【正确答案】 步骤 1：打开考生文件中的本题工程文件 sjt4 vbp，在代码编辑窗口，去掉程序中的注释符 ”“，将问号 ”?”改为正确的内容。 参考代码： If HS1 Vaiue+Text1
8、Text HS1 Max Then MsgBox”文本框中的数值太大 ” EiseIf HS1 Value+Text1 Text HS1 Min Then MsgBox”文本框中的数值太小 ” El Se HS1 Vaiue=HS1 Value+Textl Text End If 步骤 2：按要求将文件保存至考生文件夹中。 三、综合应用题 5 【正确答案】 步骤 1：新建一个 ”标准 EXE”工程，如表 3-58在窗体中画出控件并设置其相关属性。 步骤 2：打开代码编辑窗口，编写相应事件过程。参考代码： Private Sub C1_Ciick( )Open”in5 txt”For Input
9、 As#1Input #1， a$Text1 Text=a$Close #1End SubPrivate Sub C2_Click( )a$=Text1 Textb$=“n=Len(a$)For i=1 To nb$=b$+UCase$(Mid$(a$， i，1)NextText1 Text=b$End SubPrivate Sub C3_Click( )Open”out5 txt”For Output As#1Print#1， Textl TextClose#1End Sub步骤 3：按要求将文件保存至考生文件夹中。步骤 4：按 F5键键运行程序，先单击 ”输入 ”按钮，接着单击 ”转换 ”按钮，然后单击 ”存盘 ”按钮保存转换后的数据。
