1、国家二级 VB机试（上机操作）模拟试卷 407及答案与解析 一、基本操作题 1 请根据以下各小题的要求设计 Visual Basic应用程序 (包括界面和代码 )。 (1)在名称为 Form1的窗体上画一个名称为 Pic的图片框，通过属性窗口将考生文件夹下的文件 Tul-1 jpg添加到图片框，然后编写适当的事件过程。运行程序时，单击窗体，在图片框中显示 “VB等级考试 ”，如图 3179所示。注意：要求程序中不得使用变量，事件过程中只能写一条语句。存盘时必须存放在考生文件夹下，工程文件名为sjt1 vbp，窗体文件名 为 sjt1 frm。 (2)在名称为 Form1的面体上画一个名称为Co
2、mmand1的命令按钮，标题为 “命令按钮 ”。然后建立一个菜单，标题为 “控件 ”，名称为 menu，包含两个子菜单项，一个是 “显示命令按钮 ”，名称为 subMenul；另一个是 “隐藏命令按钮 ”，名称为 subMenu2，如图 3180所示。编写适当的事件过程，使得程序运行时，如果选择 “显示命令按钮 ”菜单命令，则显示命令按钮控件；而如果选择 “隐藏命令按钮 ” 菜单命令，则隐藏命令按钮控件。 注意：程序中不得使用变量，每个事件过程中只能写一条语句。存 盘时必须存放在考生文件夹下，工程文件名为 sjt2 vbp，窗体文件名为 sjt2 frm。 二、简单应用题 2 (1)在考生文件
3、夹下有一个工程文件 sjt3 vbp，运行情况如图 3181所示。程序的功能是计算表达式的值： z (x 2)! (x 3)! (x 4)! (x N)! 其中的 N和 x值通过键盘分别输入到两个文本框 Text1、 Text2中：单击名称为 Command1、标题为 “计算 ”的命令按钮，则计算表达式的值，并将计算结果显示在名称为Labe11的标签中。 在窗体文件中已经给出了全部控件和程序， 但程序不完整，请去掉程序中的注释符，把程序中的 “?”改为正确内容。 要求：程序调试通过后，必须按照如图 3181所示输入 N 5， x 12，然后计算 z的值，并将计算结果显示在标签 Labe11中，
4、否则没有成绩。 注意：不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。 (2)在考生文件夹下有一个工程文件 sjt4 vbp。窗体上有名称为 Labe11的标签和名称为 Timer1的计时器控件。该程序的功能是在名称为 Labe11的标签中循环显示不同的字符串。程序开始运行，在标签中显示 “第一项 ”(如图 3182所示 )，且每隔 1秒钟依次显示 “第二项 ”、 “第三项 ”、 “第四项 ”，如此循环。在给出的窗体文件中已经有了全部控件和程序，但程序不完整，要求去掉程序中的注释符，把程序中的“?”改为正确的内容。 注意：不能修改程序的其他部分和控件属性。最后把修改后的文件
5、按原文件名存盘。 三、综合应用题 3 在考生文件夹下有一个工程文件 sjt5 vbp。其窗体中有一个名称为 Text1的文本框数组，下标从 0开始。程序运行时，单击 “产生随机数 ”按钮，就会产生 10个 3位数的随机数，并放入 Text1数组中，如图 3183(a)所示；单击 “重排数据 ”按钮，将把 Text1中的奇数移到前面，偶数移到后面，如图 3183(b)所示。文件中已经给出了所有控件和部分程序。要求：请去掉程序中的注释符，把程序中的 “?”改为正确的内容，使其能正确运行，不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。 提示：在 “重排数据 ”按钮的事件过程中有
6、对其算法的文字描述，请仔细阅读。 国家二级 VB机试（上机操作）模拟试卷 407答案与解析 一、基本操作题 1 【正确答案】 (1)【操作步骤】 步骤 1：新建一个 “标准 EXE”工程，在窗体 Form1中画一个名称为 Pic的图片框，并设置其 Picture属性为 Tu1 1 jpg。 步骤 2：双击窗体打开代码编辑窗口，在窗体的 Click事件过程中输入代码。参考代码： Private Sub Form_Click() Pic Print“VB等级考试 “ End Sub 步骤 3：按要求将文件保存至考生文件夹中。 (2)【操作步骤】 步骤 1：新建一个 “标准 EXE”工程，按要求画出
7、控件并设置属性。 步骤 2：选择【工具】 【菜单编辑器】命令，打开菜单设计器，按要求建立菜单项。 步骤 3：打开代码编辑窗口，编写菜单命令的单击事件过程。参考代码： Private Sub sLibMenu1_Click() Command1 Visible True End Sub Private Sub subMenu2_Click() Command1 Visible False End Sub 步骤 4：按要求将文件保存至考生文件夹中。 二、简单应用题 2 【正确答案】 (1)【操作步骤】 步骤 1：打开考生文件夹 中的本题工程文件 sjt3 vbp，在代码编辑窗口，去掉程序中的注释符
8、 “”，将问号 “?”改为正确的内容。参考代码： tmp 1 tmp temp*i xn tmp z z xn(t) 步骤 2：按 键运行程序，在第一个文本框中输入 5，第二个文本框中输入12，然后单击 “计算 ”按钮。 步骤 3：按要求将文件保存至考生文件夹中。 (2)【操作步骤】 步骤 1：打开考生文件夹中的本题工程文件 sjt4 vbp，在代码编辑窗口，去掉程序中的注释符 “”，将问号 “?”改为正确的内容。参考代 码： arr Array(“第一项 “， “第二项 “， “第三项 “， “第四项 “) Static i As Integer Labe11 Caption arr(i) i 0 步骤 2：按要求将文件保存至考生文件夹中。 三、综合应用题 3 【正确答案】 【操作步骤】 步骤 1：打开考生文件夹中的本题工程文件 sjt5 vbp，在代码编辑窗口，去掉程序中的注释符 “”，将问号 “?”改为正确的内容。参考代码： j 9 temp Text1(j) While(i j) If Text1(j)Mod 2 1 Then 步骤 2：按要求将文件保存至考生文件夹中。
