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