1、国家二级 VB机试（上机操作）模拟试卷 409及答案解析(总分：6.00，做题时间：90 分钟)一、基本操作题(总题数：1，分数：2.00)1.请根据以下各小题的要求设计 Visual Basic应用程序(包括界面和代码)。 (1)在名称为 Form1的窗体上画一个名称为 Combol的组合框，其宽度为 1200，其类型如图 3188所示(即简单组合框)。要求如下：请按图中所示，通过属性窗口输入“北京”、“上海”、“广州“、“深圳”。 设置适当的属性，使得运行时，窗体的最大化按钮和最小化按钮消失。 注意：存盘时必须存放在考生文件夹下，工程文件名为 sjt1vbp，窗体文件名为 sjt1frm。
2、 (2)在名称为 Form1的窗体上画两个文本框，名称分别为 Text1、Text2，再画两个命令按钮，名称分别为 Command1、Command2，标题分别为“左”、“右”，如图 3189。 （分数：2.00）_二、简单应用题(总题数：1，分数：2.00)2.(1)在考生目录下有一个工程文件 sjt3vbp，窗体上有一个命令按钮 Command1(标题为“下一个”)。 要求：在窗体上建立一个单选按钮数组 Option1，含 4个单选按钮，标题分别为“选项 1”、“选项 2”、“选项 3”、“选项 4”，初始状态下，“选择 1为选中状态。如图 3190所示。窗体文件中已经给出了命令按钮的 C
3、lick事件过程，但不完整，请去掉程序中的注释符，把程序中的“?”改为正确的内容，使得每单击命令按钮一次，就选中下一个单选按钮，如果已经选中最后一个单选按钮，再单击命令按钮，则选中第一个单选按钮。 注意：不能修改程序中的其他部分。最后把修改后的文件按原文件名存盘。(2)在考生文件夹下有一个工程文件 sjt4vbp，窗体上已经画出所有控件，如图 3191所示。在 Text1文本框中输入一个任意的字符串(要求串的长度10)，然后选择组合框中的三个截取运算选项之一。单击“计算”按钮，将截取运算后的结果显示在 Text2中。窗体文件中已经给出了程序，但不完整，请去掉程序中的注释符，把程序中的“?”改为
4、正确的内容。 （分数：2.00）_三、综合应用题(总题数：1，分数：2.00)3.数列 1，1，3，5，9，15，25，41，的规律是从第三个数开始，每个数是它前面两个数的和加 1。在考生目录下有一个工程文件 sjt5vbp。窗体中已经给出了所有控件，如图 3192所示。请编写适当的事件过程实现以下功能：在 Text1中输入整数 40，单击“计算”按钮，则在 Text2中显示该数列第 40项的值。如果单击“存盘”按钮，则将计算的第 40项的值存到考生目录下的 out5txt 文件中。 (提示：因数据较大，应使用 Long型变量。) （分数：2.00）_国家二级 VB机试（上机操作）模拟试卷 4
5、09答案解析(总分：6.00，做题时间：90 分钟)一、基本操作题(总题数：1，分数：2.00)1.请根据以下各小题的要求设计 Visual Basic应用程序(包括界面和代码)。 (1)在名称为 Form1的窗体上画一个名称为 Combol的组合框，其宽度为 1200，其类型如图 3188所示(即简单组合框)。要求如下：请按图中所示，通过属性窗口输入“北京”、“上海”、“广州“、“深圳”。 设置适当的属性，使得运行时，窗体的最大化按钮和最小化按钮消失。 注意：存盘时必须存放在考生文件夹下，工程文件名为 sjt1vbp，窗体文件名为 sjt1frm。 (2)在名称为 Form1的窗体上画两个文
6、本框，名称分别为 Text1、Text2，再画两个命令按钮，名称分别为 Command1、Command2，标题分别为“左”、“右”，如图 3189。 （分数：2.00）_正确答案：(正确答案：(1)【操作步骤】 步骤 1：新建一个“标准 EXE”工程，按要求画出控件并设置属性。 步骤 2：按要求将文件保存至考生文件夹中。 (2)【操作步骤】 步骤 1：新建一个“标准 EXE”工程，按要求画出控件并设置属性。 步骤 2：双击“左”命令按钮，打开代码编辑窗口，在按钮的 Click事件过程中输入代码。 步骤 3：从代码编辑窗口的“对象”下拉列表中选择 Command2，从“事件”下拉列表选择 Cl
7、ick，编写以下事件过程。参考代码： Private Sub Command1_C1iCk() Text1SetFocus End Sub Private Sub Command2_C1ick() Text2SetFocuS End Sub 步骤 4：按要求将文件保存至考生文件夹中。)解析：二、简单应用题(总题数：1，分数：2.00)2.(1)在考生目录下有一个工程文件 sjt3vbp，窗体上有一个命令按钮 Command1(标题为“下一个”)。 要求：在窗体上建立一个单选按钮数组 Option1，含 4个单选按钮，标题分别为“选项 1”、“选项 2”、“选项 3”、“选项 4”，初始状态下，
8、“选择 1为选中状态。如图 3190所示。窗体文件中已经给出了命令按钮的 Click事件过程，但不完整，请去掉程序中的注释符，把程序中的“?”改为正确的内容，使得每单击命令按钮一次，就选中下一个单选按钮，如果已经选中最后一个单选按钮，再单击命令按钮，则选中第一个单选按钮。 注意：不能修改程序中的其他部分。最后把修改后的文件按原文件名存盘。(2)在考生文件夹下有一个工程文件 sjt4vbp，窗体上已经画出所有控件，如图 3191所示。在 Text1文本框中输入一个任意的字符串(要求串的长度10)，然后选择组合框中的三个截取运算选项之一。单击“计算”按钮，将截取运算后的结果显示在 Text2中。窗
9、体文件中已经给出了程序，但不完整，请去掉程序中的注释符，把程序中的“?”改为正确的内容。 （分数：2.00）_正确答案：(正确答案：(1)【操作步骤】 步骤 1：打开考生文件夹中的本题工程文件 sjsvbp，按要求画出控件数组并设置属性。 步骤 2：打开代码编辑窗口，去掉程序中的注释符“”，将问号“?”改为正确的内容。参考代码： Private Sub Command1_Click() For k0 To 3 If Optionl(k)Value Then nk End If Next k Optionl(n)ValueFalse nn1 If n4 Then n0 End If Option
10、1(n)ValueTrue End Sub 步骤 3：按要求将文件保存至考生文件夹中。 (2)【操作步骤】 步骤 1：打开考生文件夹中的本题工程文件 sjt4vbp，在代码编辑窗口，去掉程序中的注释符“”，将问号“?”改为正确的内容。参考代码： Select Case Combo1ListIndex tmpStrMid(Trim(Text1Text)，3，4) Text2TexttmpStr 步骤 2：按要求将文件保存至考生文件夹中。)解析：三、综合应用题(总题数：1，分数：2.00)3.数列 1，1，3，5，9，15，25，41，的规律是从第三个数开始，每个数是它前面两个数的和加 1。在考生
11、目录下有一个工程文件 sjt5vbp。窗体中已经给出了所有控件，如图 3192所示。请编写适当的事件过程实现以下功能：在 Text1中输入整数 40，单击“计算”按钮，则在 Text2中显示该数列第 40项的值。如果单击“存盘”按钮，则将计算的第 40项的值存到考生目录下的 out5txt 文件中。 (提示：因数据较大，应使用 Long型变量。) （分数：2.00）_正确答案：(正确答案：【操作步骤】 步骤 1：打开考生文件夹下的工程文件 sjt5vbp。 步骤 2：编写“计算”按钮的单击事件过程。参考代码： Private Sub Command1_Click() Dim f As Long a(1)1：a(2)1 For i3 To Val(Text1Text) fa(i2)a(i1)1 a(i)f Next Text2Textf End Sub 步骤 3：运行程序，在文本框中输入 40，并单击“计算”按钮获得一个结果，然后单击“存盘”按钮保存计算结果。 步骤 4：按要求将文件保存至考生文件夹中。)解析：
