1、国家二级 VB机试（上机操作）-试卷 135及答案解析(总分：6.00，做题时间：90 分钟)一、基本操作题(总题数：1，分数：2.00)1.请根据以下各小题的要求设计 Visual Basic应用程序(包括界面和代码)。 (1)在名称为 Forml的窗体上画一个标签，名称为 L1，标题为“业余爱好”，再画一个名称为 Chl的复选框数组，含三个复选框，它们的 Index属性分别为 0、1、2，标题依次为“体育”、“音乐”、“美术”，请设置复选框的属性，使其初始状态见表 21。 运行后的窗体如图 211 所示。 注意：存盘时必须存放在考生文件夹下，工程文件名为 sjtlvbp，窗体文件名为 sj
2、tlfrm。 (2)在名称为 Forml的窗体上画一个文本框，名称为 Textl；再建立一个下拉菜单，菜单标题为“操作”，名称为 M1，此菜单下含有两个菜单项，名称分别为 Show和 Hide，标题分别为“显示”、“隐藏”，清编写适当的事件过程，使得在运行时，单击“隐藏”菜单项，则文本框消失；单击“显示”菜单项，则文本框显示出来。运行后的窗体如图 212 所示。要求程序中不得使用变量，每个事件过程中只能写一条语句。 注意：存盘时必须存放在考生文件夹下，翻陧文件名为 sit2vbp，窗体文件名为 sit2fhn。 （分数：2.00）_二、简单应用题(总题数：1，分数：2.00)2.(1)在考生目
3、录下有一个工程文件 sjt3vbp，包含了所有控件和部分程序，如图 2180 所示。要求如下： 利用属性窗口设置适当的属性，使 Text1、Text2 中数据右对齐； 请编写适当的程序完成以下功能：在 Text1中输入 40(度数)，选择组合框中的一个项目，单击“计算”按钮，则根据所选择的项目，计算出相应的正弦、余弦值(保留 3位小数，第 4位截去， 取 314159)，并显示在 Text2中。 注意：考生不得修改窗体文件中已经存在的程序，在结束程序运行之前，必须进行一种计算；在 Text1中输入的必须是 40；必须用窗体右上角的关闭按钮结束程序，否则无成绩。最后按原文件名存盘。 (2)在考生
4、文件夹下有一个工程文件 sjt4vbp，窗体上已经画出所有控件。程序的作用是构成一个简单的时钟。刚运行时，不计时，选择一个单选按钮后，再单击“计时”按钮，则开始计时，并根据所选的单选按钮决定是每秒显示一次秒数，还是每 10秒显示一次秒数。Text2 用于显示秒，如图 2181 所示。窗体文件中已经给出了程序，但不完整，请去掉程序中的注释符，把程序中的?改为正确的内容。 注意：不得修改已经给出的程序。最后把修改后的文件按原文件名存盘。 （分数：2.00）_三、综合应用题(总题数：1，分数：2.00)3.在考生文件夹下有一个工程文件 sit5vbp，其窗体上有三个标签、三个文本框和两个命令按钮，均
5、使用默认名称。程序的功能是： 如果单击“读数据”命令按钮，则把考生文件夹下 in5dat 文件中两组已按升序方式排列的数(每组 30个数)分别读入数组 A和 B，并分别将它们显示在 Text1、Text2 中： 如果单击“合并”命令按钮，则将 A、B 两个数组合并为另一个按升序方式排列的数组 C，并将合并后数组 C中的数据依升序方式显示在 Text3中。 窗体中给出了所有控件(如图 2142 所示)以及“读数据”命令按钮的 Click事件过程，请完善“合并”命令按钮的 Click事件过程，使其实现上述功能。 （分数：2.00）_国家二级 VB机试（上机操作）-试卷 135答案解析(总分：6.0
6、0，做题时间：90 分钟)一、基本操作题(总题数：1，分数：2.00)1.请根据以下各小题的要求设计 Visual Basic应用程序(包括界面和代码)。 (1)在名称为 Forml的窗体上画一个标签，名称为 L1，标题为“业余爱好”，再画一个名称为 Chl的复选框数组，含三个复选框，它们的 Index属性分别为 0、1、2，标题依次为“体育”、“音乐”、“美术”，请设置复选框的属性，使其初始状态见表 21。 运行后的窗体如图 211 所示。 注意：存盘时必须存放在考生文件夹下，工程文件名为 sjtlvbp，窗体文件名为 sjtlfrm。 (2)在名称为 Forml的窗体上画一个文本框，名称为
7、 Textl；再建立一个下拉菜单，菜单标题为“操作”，名称为 M1，此菜单下含有两个菜单项，名称分别为 Show和 Hide，标题分别为“显示”、“隐藏”，清编写适当的事件过程，使得在运行时，单击“隐藏”菜单项，则文本框消失；单击“显示”菜单项，则文本框显示出来。运行后的窗体如图 212 所示。要求程序中不得使用变量，每个事件过程中只能写一条语句。 注意：存盘时必须存放在考生文件夹下，翻陧文件名为 sit2vbp，窗体文件名为 sit2fhn。 （分数：2.00）_正确答案：(正确答案：第 1小题 【操作步骤】 步骤 1：新建一个“标准 EXE”三程。 步骤 2：在窗体Form1中加入一个标签
8、和一个复选框，并用“复制”和“粘贴”的方法，生成包含三个元素的复选框数组。步骤 3：分别设置窗体和复选框数组中各元素的相关属性，其属性及值如表 3-5所示。 步骤 4：按要求将文件保存至考生文件夹中。 第 2小题 【操作步骤】 步骤 1：新建一个“标准 EXE”工程，在窗体Fonnl中画一个文木框，在属性设置窗口中将其 Name属性值设置为 Text1。 步骤 2：选择【工具】【菜单编辑器】命令，打开菜单设计器，如表 36中的设置建立菜单项。 )解析：二、简单应用题(总题数：1，分数：2.00)2.(1)在考生目录下有一个工程文件 sjt3vbp，包含了所有控件和部分程序，如图 2180 所示
9、。要求如下： 利用属性窗口设置适当的属性，使 Text1、Text2 中数据右对齐； 请编写适当的程序完成以下功能：在 Text1中输入 40(度数)，选择组合框中的一个项目，单击“计算”按钮，则根据所选择的项目，计算出相应的正弦、余弦值(保留 3位小数，第 4位截去， 取 314159)，并显示在 Text2中。 注意：考生不得修改窗体文件中已经存在的程序，在结束程序运行之前，必须进行一种计算；在 Text1中输入的必须是 40；必须用窗体右上角的关闭按钮结束程序，否则无成绩。最后按原文件名存盘。 (2)在考生文件夹下有一个工程文件 sjt4vbp，窗体上已经画出所有控件。程序的作用是构成一
10、个简单的时钟。刚运行时，不计时，选择一个单选按钮后，再单击“计时”按钮，则开始计时，并根据所选的单选按钮决定是每秒显示一次秒数，还是每 10秒显示一次秒数。Text2 用于显示秒，如图 2181 所示。窗体文件中已经给出了程序，但不完整，请去掉程序中的注释符，把程序中的?改为正确的内容。 注意：不得修改已经给出的程序。最后把修改后的文件按原文件名存盘。 （分数：2.00）_正确答案：(正确答案：第 1小题 【操作步骤】 步骤 1：打开考生文件夹中的工程文件 sjt3vbp，依次选中窗体中的两个文本框，将其 Alignment属性值设置为 1-Right Justify。 步骤 2：双击窗体中的
11、“计算”命令按钮，在打开的代码编辑窗口中编写其单击事件过程。 参考代码： Private Sub CommandlClick() Const PI=314159 Select Case Comb01Text Case”sin”：a=SinfCInt (TextlText)*PI180) Case”COs”：a=CoS(cInt (TextlText)*PI180) End Select Text2=Int(a*1000)1000 End Sub 步骤 3：按F5键键运行程序，在左侧文奉框中输入“40”，选择不同选项，单击“计算”按钮。 步骤 4：单击窗体右上角的关闭按钮以结束程序。 步骤 5：
12、按要求将文件保存至考生文件夹中。 第 2小题 【操作步骤】 步骤 1：打开考生文件中的奉题工程文件 sjt4vbp，在代码编辑窗口，去掉程序中的注释符“”，将问号“?”改为正确的内容。 参考代码： num=num+1 Text2Text=Text2Text+10 TextlText=TextlText+1 步骤 2：按要求将文件保存至考生文件夹中。)解析：三、综合应用题(总题数：1，分数：2.00)3.在考生文件夹下有一个工程文件 sit5vbp，其窗体上有三个标签、三个文本框和两个命令按钮，均使用默认名称。程序的功能是： 如果单击“读数据”命令按钮，则把考生文件夹下 in5dat 文件中两组
13、已按升序方式排列的数(每组 30个数)分别读入数组 A和 B，并分别将它们显示在 Text1、Text2 中： 如果单击“合并”命令按钮，则将 A、B 两个数组合并为另一个按升序方式排列的数组 C，并将合并后数组 C中的数据依升序方式显示在 Text3中。 窗体中给出了所有控件(如图 2142 所示)以及“读数据”命令按钮的 Click事件过程，请完善“合并”命令按钮的 Click事件过程，使其实现上述功能。 （分数：2.00）_正确答案：(正确答案：【操作步骤】 步骤 l：打开考生文件夹下的本题工程文件 sjt5Vbp。 步骤 2：编写“合并”按钮的单击事件过程。 参考代码： Private Sub Command2 一 Click() 考生编写程序开始 ia=1：ib=1：ic=1 Do While ia=30 And ib=30 If a(ia)=30 C(ic)=b(ib)：ib=ib+1：ic=ic+l Loop 考生编写程序结束 以下程序将合并后的数组 C显示在 Text3中 For k=1 TO 60 Text3=Text3+Str(C(k)+Space(2) Next k End Sub 步骤 3：运行程序，单击“读数据”按钮，然后单击“合并”按钮获得结果，然后通过窗体右上角的“关闭”按钮结束程序。 步骤 4：按要求将文件保存至考生文件夹中。)解析：
