1、国家二级 VB机试（上机操作）模拟试卷 33及答案与解析 一、基本操作题 1 请根据以下各小题的要求设计 Visual Basic应用程序 (包括界面和代码 )。在名称为Forml的窗体上画两个文本框，名称分别为 Tl、 T2，初始情况下都没有内容。请编写适当的事件过程，使得在运行时，在 T1中输入的任何字符，立即显示在 T2中(如图 2-176所示 )。程序中不得使用任何变量。注意：存盘时必须存放在考生文件夹下，工程文件名为 sjtl vbp，窗体文件名为 sjtl frm。 2 在名称为 Forml的窗体上画一个文本框，名 称为 Textl；再画一个命令按钮，名称为 Cl，标题为 ”移动
2、”(如图 2-177所示 )。请编写适当的事件过程，使得在运行时，单击 ”移动 ”按钮，则文本框水平移动到窗体的最左端。程序中不得使用任何变量。注意：存盘时必须存放在考生文件夹下，工程文件名为 sjt2 vbp，窗体文件名为 sjt2 frm。 二、简单应用题 3 在考生文件夹下有一个工程文件 sjt3 vbp，其窗体上有一个名称为 Textl的文本框；一个名称为 L1的列表框；一个命令按钮，名称为 Cl，标题为 ”添加 ”(如图 2-178所示 )。程序的功能是，在运行 时，如果在文本框中输入一行内容并单击 ”添加 ”按钮，则把文本框中的内容作为列表项添加到列表中。如果单击列表中的某一项，则
3、立即从列表中删除该项。要求：去掉程序中的注释符，把程序中的 ?改为正确的内容，使其实现上述功能，但不能修改程序中的其他部分，也不能修改控件的属性。最后把修改后的文件以原来的文件名存盘。 4 在考生文件夹下有一个工程文件 sjt4 vbp，请在窗体上画一个文本框，名称为Textl；画一个命令按钮，名称为 C1，标题为 ”确定 ”；再画三个单选按钮，名称分别为 Opl、 Op2、 Op3，标题分别为 ”飞机 ”、 ”火车 ”、 ”汽车 ”(如图 2-179所示 )。请编写适当的事件过程，使得在运行时，选中一个单选按钮并单击 ”确定 ”按钮后，按照表 2-5在文本框中显示相应内容。注意：不得修改已经
4、给出的程序。退出程序时必须通过单击窗体右上角的关闭按钮。在结束程序运行之前，必须选中一个单选按钮，并单击 ”确定 ”按钮。否则无成绩。 三、综合应用题 5 在考生文件夹下有一个工程文件 sjt5 vbp，其功能是： 单击 ”读数据 ”按钮，则把考生文件夹下 in5 dat文件中的 100个 0 999之间的整数读入数组 a中； 单击 ”计算 ”按钮，则对 这 100个整数中的所有水仙花数 (当一个数的值等于该数中各位数字的立方和时，此数被称为水仙花数。例如， 153=1 sup 3 /sup +5 sup 3 /sup +3 sup 3 /sup，所以 153就是一个水仙花数 )求平均值，并对
5、该平均值数尾取整后显示在文本框 Textl中。窗体中给出了所有控件 (如图 2-180所示 )，已给 ”读数据 ”按钮的 Click事件过程，请为 ”计算 ”按钮编写适当的事件过程实现上述功能。注意：不得修改已经存在的控件和程序，在结束程序运行之前，必须进行计算，且必须用窗体右上角的关闭按钮结束 程序，否则无成绩。最后，程序按原文件名存盘。 国家二级 VB机试（上机操作）模拟试卷 33答案与解析 一、基本操作题 1 【正确答案】 步骤 1：新建一个 ”标准 EXE”工程。步骤 2：在窗体 Forml中加入两个文本框，并分别设置它们的相关属性，属性及值如表 3-99所示。步骤 3：双击 T1文本
6、框，打开代码编辑窗口，在 T1的 Change事件过程中输入如下代码：参考代码： Private Sub T1_Change( ) T2 Text=T1 TextEnd Sub步骤 4：按要求将文件保存至考生文件夹中。 2 【正确答案】 步骤 1：新建一个 ”标准 EXE”工程，如表 3-100在窗体中画出控件并设置其相关属性。 步骤 2：打开代码编辑窗口，编写命令按钮的 Click事件过程。参考代码： Private Sub C1_Click( )Textl Left=0End Sub步骤 3：按要求将文件保存至考生文件夹中。 二、简单应用题 3 【正确答案】 步骤 1：打开考生文件下的本题
7、工程文件 sjt3 vbp，在代码编辑窗口，去掉程序中的注释符 ”“，将问号 ”?”改为正确的内容。 参考代码： Pricate Sub C1_Click( ) L1 AddItem Textl Text End Sub Private Sub L1_Click( ) L1 RemoveItem L1 ListIndex End Sub 步骤 2：按要求将文件保存至考生文件夹中。 4 【正确答案】 步骤 1：打开考生文件夹中的本题工程文件 sjt4 vbp，在名为Forml的窗体上画一个文本框、一个命令按钮和三个单选按钮，并设置它们的相关属性，其属性及值如表 3-101所示。 步骤 2：双击
8、”确定 ”命令按钮，打开代码编辑窗口，编写命令按钮的 单击事件过程。参考代码：Private Sub c1_Click( )If Opl Value ThenTextl Text=“需要 1小时 ”ElseIf Op2 Value ThenTextl Text=“需要 10小时 ”ElseIf Op3 Value ThenTextl Text=“需要 15小时 ”End IfEnd Sub步骤 3：按 F5键键运行程序，选择不同选项，单击 ”确定 ”按钮，然后单击窗体右上角的关闭按钮退出程序。步骤4：按要求将文件保存至考生文件夹中。 三、综合应用题 5 【正确答案】 步 骤 1：打开考生文件夹下的本题工程文件 sjt5 vbp，在代码编辑窗口的指定位置编写 ”计算 ”按钮的单击事件过程。 参考代码： Dim s As Long， n As Integer For i=1 To 1 00 If isnarc(a(i)Then s= s +a(i) n=n+ 1 End I f Next i Textl Text=Fix(s n) 步骤 2：按要求将文件保存至考生文件夹中。 步骤 3：按 F5键运行程序，先单击 ”读数据 ”按钮，接着单击 ”计算 ”按钮，然后单击窗体右上角的 关闭按钮结束程序。
