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键键运行程序,先单击 ”输入 ”按钮,接着单击 ”转换 ”按钮,然后单击 ”存盘 ”按钮保存转换后的数据。