1、国家二级 VB机试（上机操作）模拟试卷 364及答案与解析 一、基本操作题 1 (1)在名称为 Form1的窗体上画一个名称为 Picture1的图片框 (PictureBox)，高、宽均为 1000。在图片框内再画一个有边框的名称为 Imagel的图像框 (Image)。并通过属性窗口把考生目录下的图标文件 POINTl1(香蕉图标 )装入图像框 Imagel中，如图3170所示。 注意：存盘时必须存放在考生文件夹下，工程文件名为 sjtl vbp，窗体文件名为 sjtl frm。 (2)在名称为 Form1的窗体上画一个名 称为 Command1、标题为 “保存文件 ”的命令按钮，再画一个
2、名称为CommonDialogl的通用对话框。 要求：、 通过属性窗口设置适当的属性，使得运行时对话框的标题为 “保存文件 ”，且默认文件名为 out2； 运行时单击 “保存文件 ”按钮，则以 “保存对话框 ”方式打开该通用对话框。如图 3 171所示。注意：要求程序中不能使用变量，每个事件过程中只能写一条语句。保存时必须存放在考生文件夹下，工程文件名为 sjt2 vbp，窗体文件名为 sjt2 frm。 二、简单应用题 2 (1)在考生目录下有一个工程文件 sjt3 vbp，窗体上有一个单选按钮数组，含三个单选按钮，均没有标题，请利用属性窗口，为单选按钮依次添加标题为 “北京 ”、“上海 ”
3、、 “广州 ”；再添加一个标题为 “显示 ”的命令按钮，如图 3 75所示。程序的功能是在运行时，如果选中一个单选按钮后，单击 “显示 ”按钮，则根据单选按钮的选中情况，在窗体上显示 “我的出生地是北京 ”、 “我的出生地是上海 “或 “我的出生地是广州 ”。 要求： 依次添加单选按钮标题为 “北京 ”、 “上海 ”、 “广州 ”；设初始选中的是 “上海 ”，添加命令按钮标题为 “显示 ”。 去掉程序中的注释符，把程序中的 ?改为正确的内容，使其实现上述功能，但不能修改程序中的其他部分，也不能修改控件的其他属性。最后把修改后的文件按原文件名存盘。 (2)在考生目录下有一个工程文件 sjt4 v
4、bp，请在 Form1窗体中画三个标签，名称分别为 B1、 B2、L1，标题分别为 “字号 ”、 “字体 “、 “计算机等级考试 ”，其中 L1的高为 500，宽为3000；再在 B1、 B2标签的下面画两个组合框，名称分别为 Cb1、 Cb2，并为 Cb1添加项目： “10”、 “15”、 “20”，为 Cb2添加项目： “黑体 “、 “隶书 ”、 “宋体 ”。请编写适当的事件过程，使得在运 行时，当在 Cb1中选一种字号、 Cb2中选一种字体时，标签 L1中的文字立即变为选定的字号和字体。如图 3 76所示。 注意：考生不得修改窗体文件中已经存在的程序，在结束程序运行之前，必须选择一种字号
5、和字体。必须用窗体右上角的关闭按钮结束程序，否则无成绩。最后，按原文件名存盘，程序中不得使用任何变量。 三、综合应用题 3 在考生文件夹下有一个工程文件 sjt5 vbp，窗体上有 2个标题分别是 “读数据 ”和“查找质数 ”的命令按钮。请画 1个名称为 Text1、初始值为空的文本框，该文本框允许显示多行内容，且有垂直滚动 条，如图 3-36所示。 程序功能： (1)考生文件夹下 in5 dat文件中存放着 100个大于 10的正整数。单击 “读数据 ”按钮，则将in5 dat文件中的数据读入数组 a中。 (2)单击 “查找质数 ”按钮，则查找 in5 dat文件中的所有质数，并将这些质数顺
6、次显示在 Text1文本框内。 “读数据 ”按钮的Click事件过程已给出，请编写函数 prime，实现上述功能。 注意：考生不得修改窗体文件中已经存在的控件和程序，在结束程序运行之前，必须使用 “查找质数 ”按钮完成查找质数的过程，且必须用窗体右上角的关闭按钮结束程序 ，否则无成绩。最后，程序按原文件名存盘。 国家二级 VB机试（上机操作）模拟试卷 364答案与解析 一、基本操作题 1 【正确答案】 (1)步骤 1：新建一个 “标准 EXE”工程，按要求画出控件并设置属性。 步骤 2：按要求将文件保存至考生文件夹中。 (2)步骤 1：新建一个 “标准 EXE”工程，选择【工程】 【部件】命令
7、，在弹出的“部件 ”对话框的列表中选中 “MicroSoft Common Dialog Control6 0”项目，单击 “确定 ”按钮。 步骤 2： 在窗体 Form1上画一个通用对话框和一个命令按钮并设置相关属性。 步骤 3：打开的代码编辑窗口中，编写命令按钮的单击事件过程。 PriVate S。 ub Command1_Click() CommonDialogl Action=2 或 CommonDialogl showSave End Sub 步骤 4：按要求将文件保存至考生文件夹中。 【试题解析】 (1)本题只需按照要求画出控件并设置属性即可，注意图像框要画在图片框内部。 (2)通
8、用对话框的默认文件名由 FileName属性设置，标题由 DialogTitle属性设置。本题可在 “保存文件 ”的单击事件过程中，用语句通过调用通用对话框的ShowSave方法或通过设置其 Action属性值为 2，使其以 “保存对话框 ”方式打开。 二、简单应用题 2 【正确答案】 (1)步骤 1：打开考生文件夹中的本题工程文件 sjt3 vbp，依次选中窗体中的各单选按钮和命令按钮，设置它们的相关属性，其属性及值如表 4-47所示。 步骤 2：双击 “显示 ”命令按钮，打开代码编辑窗口，去掉程序中的注释符 “”，将问号 “?”改为正确的内容。 参考 代码： PriVate Sub Cl_
9、Click()For i=0 To 2If Op1(i) Value=True ThenPrint“我的出生地是 “+Op1(i) CaptionEnd IfNextEnd Sub 步骤 3：按要求将文件保存至考生文件夹中。 (2)步骤 1：打开考生文件夹中的本题工程文件 sjl4 vbp，如表 4-48画出三个标签和两个组合框并设置属性。步骤 2：在代码编辑窗口，编写两个组合框的单击的单击事件过程。参考代码： Private Sub Cb1_Click()L1 FontSize=Cb1 TextEnd SubPriVate Sub Cb2_Click()L1 Font=Cb2 TextEnd
10、 Sub 步骤 3：按键运行程序并选择一个字号和字体，然后单击窗体右上角的关闭按钮结束程序。 步骤 4：按要求将文件保存至考生文件夹中。 【试题解析】 (1)本题要求通过修改程序源代码，来实现当选中不同选项时，单击命令按钮，即在窗体显示出不同信息的功能。程序源代码在按钮的 Click事件过程中，利用 For循环语句逐一判断单选按钮数组中每个元素当前是否被选中，若选中则通过在窗体中用 Print语句显 示出相关信息。因为单选按钮数组一共有三个元素，且数组索引号 (Index属性值 )从 0开始，故循环语句的初值为 0，终值为 2。 (2)组合框的 Text属性可以返回当前选中的列表项内容，本题只
11、需要分别在两个组合框的 Click事件中令标签的相应字体属性等于组合框当前选中项的内容即可。 三、综合应用题 3 【正确答案】 步骤 1：打开考生文件夹中的工程文件 sjt5 vbp，在窗体上添加以一个文本框，并按照表 4-24设置相关属性。步骤 2：在代码编辑窗口中，补充 prime函数。参考代码： Function prime(p As Integer) As Boolean考生编写 Dim flag As Booleanflag=True For m=2 To p 2If p Mod m=0 Then flag=False Exit For End If Next m prime=flag End Function 步骤 3：按运行程序，单击各按钮测试验证。 步骤 4：按要求将文件保存至考生文件夹中。 【试题解析】 题目要求设计判断某个数 n是否素数的函数 prime，方法是：看在2 n 2范围内能否找到一个整数 m将 n整 除，若 m存在，则 n不是素数；若找不到 m，则 n为素数。
