1、国家二级 VB机试（上机操作）模拟试卷 309及答案与解析 一、基本操作题 1 请根据以下各小题的要求设计 Visual Basic应用程序 (包括界面和代码 )。 (1)在名称为 Form1的窗体上画一个名称为 Pic的图片框，通过属性窗口将考生文件夹下的文件 Tu1-1 jpg添加到图片框，然后编写适当的事件过程。运行程序时，单击窗体，在图片框中显示 “VB等级考试 ”，如图 3179所示。注意：要求程序中不得使用变量，事件过程中只能写一条语句。存盘时必须存放在考生文件夹下，工程文件名为 sjt1 vbp，窗体文件名为 sjt1 frm。 (2)在名称为 Form1的窗体上画一个名称为 C
2、ommand1的命令按钮，标题为 “命令按钮 ”。然后建立一个菜单，标题为 “控件 ”，名称为 menu，包含两个子菜单项，一个是 “显示命令按钮 ”，名称为subMenu1；另一个是 “隐藏命令按钮 ”，名称为 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、标题为 “计算 ”的命令按钮，则计算表达式的值，并将计算结果显示在名称为 Label1的标签中。在窗体文件中已经给出了全部控件和程序，但程序不完整，请去 掉程序中的注释符，把程序中的 “?”改为正确内容。要求：程序调试通过后，必须按照如图 3181所示输入 N=5， x=12，然后计算 z的值，并将计算结果显示在标签 Label1中，否则
4、没有成绩。注意：不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。 (2)在考生文件夹下有一个工程文件 sjt4 vbp。窗体上有名称为Label1的标签和名称为 Timer1的计时器控件。该程序的功能是在名称为 Label1的标签中循环显示不同的字符串。程序开始运行，在标签中显示 “第一项 ”(如图 3182所示 )，且每隔 1秒 钟依次显示 “第二项 ”、 “第三项 ”、 “第四项 ”，如此循环。在给出的窗体文件中己经有了全部控件和程序，但程序不完整，要求去掉程序中的注释符，把程序中的 “?”改为正确的内容。注意：不能修改程序的其他部分和控件属性。最后把修改后的文件按原文
5、件名存盘。三、综合应用题 3 在考生文件夹下有一个工程文件 sjt5 vbp。其窗体中有一个名称为 Text1的文本框数组，下标从 0开始。程序运行时，单击 “产生随机数 ”按钮，就会产生 10个 3位数的随机数，并放入 Text1数组中，如图 3183(a)所示；单击 “重排数据 ”按钮， 将把 Text1中的奇数移到前面，偶数移到后面，如图 3183(b)所示。文件中已经给出了所有控件和部分程序。要求：请去掉程序中的注释符，把程序中的 “?”改为正确的内容，使其能正确运行，不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。提示：在 “重排数据 ”按钮的事件过程中有对其算法
6、的文字描述，请仔细阅读。 国家二级 VB机试（上机操作）模拟试卷 309答案与解析 一、基本操作题 1 【正确答案】 第 1小题 步骤 1：新建一个 “标准 EXE”工程，在窗体 Form1中画一个名称为 Pic的图片框 ，并设置其 Picture属性为 Tu1-1jpg。 步骤 2：双击窗体打开代码编辑窗口，在窗体的 Click事件过程中输入代码。 参考代码： Private Sub Form_Click() Pic Print“VB等级考试 “ End Sub 步骤 3：按要求将文件保存至考生文件夹中。 第 2小题 步骤 1：新建一个 “标准 EXE”工程，按要求画出控件并设置属性。 步骤
7、 2：选抒 工具 菜单编辑器 命令，打开菜单设计器，按要求建立菜单项。 步骤 3：打开代码编辑窗口，编写菜单命令的单击事件过程。 参考代码： Private Sub subMenu1_Click() Command1 Visible=True End Sub Private Sub slabMenu2_Click() Command1 Visible=False End Sub 步骤 4：按要求将文件保存至考生文件夹中。 【试题解析】 第 1小题：本题只需按要求在窗体及框架中画出控件，并设置其相应属性，然后在窗体的单击事件中调用图片框的 Print方法显示文奉。 第 2小题：要实现本题中的功能
8、，应在 “显示命令按钮 ”菜单项的 Click事件过程中，令命令按钮的 Visible属性为 Trile，在 “隐藏命令按钮 ”菜单项的 Click事件过程中，设置命令按钮的 Visible属性为 False。 二、简单应用题 2 【正确答案】 第 1小题 步骤 1：打开考生文件夹中的本题工程文件 sjt3 vbp，在代码编辑窗口，去掉程序中的注释符 “”，将问号 “?”改为正确的内容。 参考代码： tmp=1 tmp=temp*i xn=tmp z=z+xn(t) 步骤 2：按 F5键运行程序，在第一个文本框中输入 5，第二个文本框中输入12，然后单击 “计算 ”按钮。 步骤 3：按要求将文
9、件保存至考 生文件夹中。 第 2小题 步骤 1：打开考生文件夹中的本题工程文件 sjt4 vbp，在代码编辑窗口，去掉程序中的注释符 “”，将问号 “?”改为正确的内容。 参考代码： arr=Array(“第一项 “， “第二项 “， “第三项 “， “第四项 “) Static i As Integer Label1 Caption=arr(i) i=0 步骤 2：按要求将文件保存至考生文件夹中。 【试题解析】 第 1小题：本题源程序中，自定义函数 xn的功能是进行 m!阶乘运算，它通过 For循环连续 m次将循环变量 i的值乘以累积变量 tmp(第一个 ?处 tmp初值应为 1)来实现。故
10、白定义函数 xn中第二个 ?处应改为： tmp*i，作为函数返回值第三个 ?处应改为： xn。 在 “计算 ”按钮的单击事件过程中，根据程序所要计算表达式的特点，源程序利用一个 For。循环依次计算表达式中各项的值 (x-i)!)，并将其累加入变量 z。计算表达式中各项的值通过调用自定义函数 xn(t)来实现的，其中 t=x-i。故Command1_Click事件过程中第一个 ?处应改为： xn(t)。计算结果显示在标签中。 第 2小题：要实现本题中的功能，在窗体的 Load事件过程中，首先使用 Array函数建立一个新数组，然后设置计时器的相关属性并启用计时器；在计时器的Timer事件中，由
11、于需要计算 Timer事件的执行次数才能判断出应该显示何种文宁，因此计数变量 i应该声明为 Static类型的变量，然后把数组的第 i项显示在标签中，接下来令 i+1，一旦 i超过了 3就将其重新置 0以便实现循环显示。 三、综合应用题 3 【正确答案】 步骤 1：打开考生文件夹中的本题工程文件 sjt5 vbp，在代码编辑窗口，去掉程序中的注释符 “”，将问号 “?”改为正确的内容。 参考代码： j=9 temp=Text1(j) While(i j) If Text1(j)Mod2=1Then 步骤 2：按要求将文件保存至考生文件夹中。 【试题解析】 本题源程序中，变量 i和 j均用作 Text1文本框数组的索引号 (即Index属性值 )，根据算法中的第 1条，可知 i=0、 j=9、 temp=Text1(i)，其中 “暂存最后一个数 ”的目的是为空出一个位置放第一个偶数。根据算法中的第 3条，检查第 j个数是否为奇数的条件表达式为： Text1(j)Mod2=1。算法中的第 2条和第 3条交替运行，将实现一后 (偶数 )一前 (奇数 )重排数据的目的。根据算 法中的第 4条，可知在 i向后移、 i向前移过程中，当 i=j时则停止这种移动 (故 While循环的条件表达式为 i j)。将先前暂存的数 (temp)放到当前空缺位置，以实现算法中的第 5条。
