国家二级VB机试（综合应用题）模拟试卷2（共90题）.pdfVIP

家二级VB机试综（合应用题）模拟试

卷2共（9套）

共（90题）

家二级VB机试综（合应用题）模拟试

卷第1套

一、综合应用题本（题共70题，每题分，共70

分。）

1、以下数列：1,1,2,3,5,8,13,21…的规是从第3个数开始，每个数都

是其前面两个数之和。在考生文件夹下有一个工程文件sjt5.vbpo窗体中已经给

出了所有控件，如图所示。请编写适当的事件过程完成如下功能：选中一个单选按

钮后，单击“计算”按钮，则计算出上述数列第n项的值，并在文本框中显示，n是

选中的单选按钮后而的数值提（示：因计算结果较大，应使用艮整型变量）。注意：

小能修改已经给出的程序和已有的控件的属性；在结束程序运行之前，必须选中一

个单选按钮，并单击“计算”按钮以获得一个结果；必须使用窗体右上角的关闭按钮

结束程序，否则无成绩。最后把修改后的文件按原文件名存盘。

0Forml

标准答案：【操作步骤】步骤1：打开本题工程文件。步骤2：打开代码编辑窗

口，在指定位置编写如下代码。参考答案PrivateSubCommand1Click()ima()As

LongimiAsIntegerimnAsInteger*Opl.Count是单选按钮数目,这里用的是

控件数组Fori=OToOpl.Count——判断哪一项被选择，把它后面的数值赋给

n,确定n值IfOpl(i).Value=TrueThenn=Val(Opl(i).Caption)ExitForEndIf

NextReima(n)，重新申请空间,这里是动态申请a⑴=1a⑵=/数列第一项、第

二项值确定Fori=3Tona6=a(i—l)+a(i—2)，后一项值是前两项值之和Next

Tcxtl.Tcxt=a(n)EndSub步骤3：调试并运行程序，关闭程序后按题目要求存

盘。

知识点解析：暂无解析

2、在考生文件夹下有一个工程文件sjt5.vbp,其名称为FormI的窗体上已有三个

文本框Textl、Text2.Text3,以及部分程序代码，请完成以下工作。①在属性窗

口中修改Text3的适当属性，使其在运行时不显示，作为模拟的剪贴板使用，窗体

②建立下拉式菜单，如下

标摩名称

编辑Edit

剪切Cut

复制Copy

粘贴Paste

表所示。③窗体文件中给出了所有事件过

程，但不完整，请去掉程序中的注释符，把程序中的?改为正确的内容，以便实现

如下功能：当光标所在的文件框中无内容时，“剪切”、“复制”不可用，否则可以把

该文本框中的内容剪切或复制到Text3中；若Tcxt3中无内容，则“粘贴”不能用，

否则可以把Text3中的内容粘贴在光标所在的文本框中的内容之后。注意：不能

修改程序中的其他部分，各菜单项的标题名称必须正确。最后将修改后的文件按原

文件名存盘。

标准答案：【操作步骤】步骤1：打开本题工程文件，将TexB的Visible属性设

置为