1、国家二级 VB机试（上机操作）模拟试卷 394及答案解析(总分：6.00，做题时间：90 分钟)一、基本操作题(总题数：1，分数：2.00)1.请根据以下各小题的要求设计 Visual Basic应用程序(包括界面和代码)。 (1)在名称为 Form1的窗体上画一个名称为 Frame1、标题为“目的地“的框架，在框架中添加三个复选框，名称分别为Check1、Check2、Check3，其标题分别是“上海”、“广州”、“巴黎”，其中“上海”为选中状态，“广州”为未选状态，“巴黎”为灰色状态，如图 3117所示。请画控件并设置相应属性。 注意：存盘时必须存放在考生文件夹下，工程文件名为 sjt1v
2、bp，窗体文件名为 sjt1frm。 (2)在名称为Form1的窗体上画一个名称为 Picture1的图片框，其宽和高分别为 1700、1900。请编写适当事件过程，使得在运行时，单击图片框，则装入考生目录下的图形文件 pic1bmp，如图 3118所示。单击窗体则图片框中的图形消失。要求程序中不得使用变量，每个事件过程中只能写一条语句。 （分数：2.00）_二、简单应用题(总题数：1，分数：2.00)2.(1)在考生目录下有一个工程文件 sjt3vbp，窗体文件中已给出所有控件和部分程序，如图 3119所示。要求： 利用属性窗口设置适当的属性，使 Text1、Text2 中数据右对齐； 请编
3、写适当的程序完成以下功能：在 Text1中输入 40(度数)，选择一个单选按钮，单击“计算”按钮，则根据所选择的单选按钮，计算出相应的正弦、余弦值(保留 3位小数，第 4位截去， 取 314159)，并显示在 Text2中。注意：考生不得修改窗体文件中已经存在的程序，在结束程序运行之前，必须进行一种计算，在Text1中输入的必须是 40，必须用窗体右上角的关闭按钮结束程序，否则无成绩。最后程序按原文件名存盘。 (2)在考生文件夹下有一个工程文件 sjt4vbp，窗体上已经给出所有控件。程序运行时，单击“开始”按钮，则汽车图标向右运动；单击“停止”按钮则汽车停止运动；移动滚动条上的滚动框，可以改
4、变汽车的运动速度(滚动框向右移动，速度减慢)。如图 3120所示。 （分数：2.00）_三、综合应用题(总题数：1，分数：2.00)3.数列 1，1，2，3，5，8，13，21，的规律是从第三个数开始，每个数是它前面两个数之和。在考生目录下有一个工程文件 sjt5vbp。窗体中已经给出了所有控件，如图 3121所示。请编写适当的事件过程实现以下功能：在 Text1中输入整数 40，单击“计算”按钮，则在 Text2中显示该数列第 40项的值；如果单击“存盘”按钮，则将计算的第 40项的值存到考生目录下的 out5txt 文件中。 (提示：因数据较大，应使用 Long型变量。) （分数：2.00
5、）_国家二级 VB机试（上机操作）模拟试卷 394答案解析(总分：6.00，做题时间：90 分钟)一、基本操作题(总题数：1，分数：2.00)1.请根据以下各小题的要求设计 Visual Basic应用程序(包括界面和代码)。 (1)在名称为 Form1的窗体上画一个名称为 Frame1、标题为“目的地“的框架，在框架中添加三个复选框，名称分别为Check1、Check2、Check3，其标题分别是“上海”、“广州”、“巴黎”，其中“上海”为选中状态，“广州”为未选状态，“巴黎”为灰色状态，如图 3117所示。请画控件并设置相应属性。 注意：存盘时必须存放在考生文件夹下，工程文件名为 sjt1
6、vbp，窗体文件名为 sjt1frm。 (2)在名称为Form1的窗体上画一个名称为 Picture1的图片框，其宽和高分别为 1700、1900。请编写适当事件过程，使得在运行时，单击图片框，则装入考生目录下的图形文件 pic1bmp，如图 3118所示。单击窗体则图片框中的图形消失。要求程序中不得使用变量，每个事件过程中只能写一条语句。 （分数：2.00）_正确答案：(正确答案：(1)【操作步骤】 步骤 1：新建一个“标准 EXE”工程。 步骤 2：在窗体 Form1中加入一个框架，然后依次在框架中画出三个复选框。 步骤 3：分别设置框架和各复选框的相关属性，其属性及值如表 470所示。
7、步骤 4：按要求将文件保存至考生文件夹中。 (2)【操作步骤】 步骤1：新建一个“标准 EXE”工程，如表 471在窗体中画出图片框并设置其相关属性。 )解析：二、简单应用题(总题数：1，分数：2.00)2.(1)在考生目录下有一个工程文件 sjt3vbp，窗体文件中已给出所有控件和部分程序，如图 3119所示。要求： 利用属性窗口设置适当的属性，使 Text1、Text2 中数据右对齐； 请编写适当的程序完成以下功能：在 Text1中输入 40(度数)，选择一个单选按钮，单击“计算”按钮，则根据所选择的单选按钮，计算出相应的正弦、余弦值(保留 3位小数，第 4位截去， 取 314159)，并
8、显示在 Text2中。注意：考生不得修改窗体文件中已经存在的程序，在结束程序运行之前，必须进行一种计算，在Text1中输入的必须是 40，必须用窗体右上角的关闭按钮结束程序，否则无成绩。最后程序按原文件名存盘。 (2)在考生文件夹下有一个工程文件 sjt4vbp，窗体上已经给出所有控件。程序运行时，单击“开始”按钮，则汽车图标向右运动；单击“停止”按钮则汽车停止运动；移动滚动条上的滚动框，可以改变汽车的运动速度(滚动框向右移动，速度减慢)。如图 3120所示。 （分数：2.00）_正确答案：(正确答案：(1)【操作步骤】 步骤 1：打开考生文件夹中的本题工程文件 sjt3vbp，程序界面如图
9、44所示。 )解析：三、综合应用题(总题数：1，分数：2.00)3.数列 1，1，2，3，5，8，13，21，的规律是从第三个数开始，每个数是它前面两个数之和。在考生目录下有一个工程文件 sjt5vbp。窗体中已经给出了所有控件，如图 3121所示。请编写适当的事件过程实现以下功能：在 Text1中输入整数 40，单击“计算”按钮，则在 Text2中显示该数列第 40项的值；如果单击“存盘”按钮，则将计算的第 40项的值存到考生目录下的 out5txt 文件中。 (提示：因数据较大，应使用 Long型变量。) （分数：2.00）_正确答案：(正确答案：【操作步骤】 步骤 1：打开考生文件夹下的工程文件 sjt5vbp。 步骤 2：编写“计算”按钮的单击事件过程。 参考代码： Private Sub Command1_C1iCk() Dim f1，f2，f As Long Dim a(40) As Long f11：f21 a(1)f1：a(2)f2 For i3 To Val(Text1Text) ff1f2 a(i)f：f1f2：f2f Next Text2Texta(40) End Sub 步骤 3：运行程序，在文本框中输入 40，并单击“计算”按钮获得一个结果，然后单击“存盘”按钮保存计算结果。 步骤 4：按要求将文件保存至考生文件夹中。)解析：
