1、国家二级 VB机试（上机操作）模拟试卷 149及答案与解析 一、基本操作题 1 (1)在名称为 Form1的窗体上添加一个名称为 L1，标题为 “业余爱好 ”的标签，再添加一个名称为 Ch1的复选框数组，含 3个复选框，它们的 Index属性分别为 0、1、 2，标题依次为 “体育 ”、 “音乐 ”、 “美术 ”，请设置复选框的属性，使其初始状态如下表所示。 程序运行后的窗体如图所示。 注意：存盘时必须存放在考生文件夹下，工程文件名为 sjt1 vbp，窗体文件名保存为sjt1 frm。 (2)存名称为 Form1的窗体上添加一个名称为 Text1的文本框；再建立一个下拉菜单，菜单标题为 “操
2、作 ”，名称为 M1，此菜单下含有两个菜单项，名称分别为 Show和 Hide，标题分别为 “显示 ”、 “隐藏 ”，请编写适当的事件过程，使程序运行时，单击 “隐藏 ”菜单项，文本框消失；单击 “显示 ”菜单项，文本框重新出现，程序运行后的窗体如图所示。要求程序中不得使用变量，每个事件过程中只能写一条语句。 注意：存盘时必须存放在考生文件夹下，工程文件名保存为sjt2 vbp，窗体文件名保存为 sit2 frm。二、简单应用题 2 (1)在名称为 Form1的窗体上添加一 个名称为 L1的标签，标题为 “口令 ”；添加两个文本框，名称分别为 Text1、 Text2，初始内容为空；再添加三个
3、命令按钮，名称分别为 C1、 C2、 C3，标题分别为 “显示口令 ”、 “隐藏口令 ”、 “复制口令 ”。在程序开始运行时，向 Text1中输入的所有字符，都显示为 “*”，单击 “显示口令 ”按钮后，在 Text1中显示所有字符，再单击 “隐藏口令 ”按钮后， Text1中的字符不变，但显示的都是 “?”，单击 “复制口令 ”后，把 Text1中的实际内容复制到 Text2中，如图所示。 要求： 在属性窗口中，将窗体的标题改为 “口令窗口 ”； 建立适当的事件过程，完成上述功能。每个过程中只允许写一条语句，且不能使用变量。 注意：存盘时，工程文件名保存为 sjt3 vbp，窗体文件名保存为
4、 sjt3 frm。(2)在名称为Form1的窗体上添加一个名称为 P1的图片框，并利用属性窗口把考生文件火中的图标文件 Open ico放到图片框中；再添加一个通用对话框控件，名称为 CD1，利用属性窗口设置相应属性，即打开对话框时：标题为 “打开文件 ”，文件类型为“Word文档 ”，初始文件夹为 C盘根文件夹。再编写适当的事件过程，使得程序在运行时，单击 P1图片框 ，可以打开上述对话框。程序运行后的窗体如图所示。 注意：存盘时必须存放在考生文件夹下，工程文件名保存为 sjt4 vbp，窗体文件名保存为 sjt4 frm。程序中不得使用任何变量。三、综合应用题 3 在考生文件央下有一个工
5、程文件 sjt5 vbp，窗体上有两个命令按钮，标题分别是“读数据 ”和 “统计 ”，请添加一个名称为 Label1、标题为 “回文个数为 ”的标签和一个名称为 Text1，初始内容为空的文本框，如图所示。 程序功能如下： 单击 “读数据 ”按钮，则将考生文件夹下 in5 dat文件的内容读到变量 s中； 单击 “统计 ”按钮，则统计 in5 dat文件 (该文件中仅含南空格间隔开的字符串 )中回文的个数，并将统计的同文个数显示在 Text1文本框内 (所谓回文是指顺读与倒读都一样的字符串，如 “recycer”)。 “读数据 ”和 “统计 ”按钮的 Click事件过程已经给出，请完善foun
6、dhuiwen过程的功能，实现上述程序功能。注意：考生不得修改窗体文件中已存在的控件和程序，在结束程序运行之前，必须先进行统计，且必须用窗体右上角的关闭按钮结束程序，否则无成绩。最后，程序按原文件名存盘。 国家二级 VB机试（上机操作）模拟试卷 149答案与解析 一、基本操作题 1 【正确答案】 (1)【操作步骤】 步骤 1：建立界而，按照题目要求建市一个名称为 L1， Caption属性为 “业余爱好 ”的标签和 1个名称为 Ch1的复选框数组，包含 3个复选框，并设置其相应属性，如图 3 24所示。设置其他控件相关属性，程序中用到的控件及属性见表 3 24。步骤 2：调试并运行程序，关闭程
7、序后按题目要求存盘。 (2)【操作步骤】 步骤 1：新建一个 “标准 EXE”工程，在窗体中绘制一个文本框，在属性设置窗口中将其 Name：属 性值设置为Text1。打开菜单编辑器，按表 3 25设置建立菜单项。步骤 2：打开代码编辑窗口，在指定位置编写如下代码。 参考答案 Private Sub Hide Click() Text1 VisibleFalse当用户单击了 “隐藏 “菜单项时。则 Text1不可见 End Sub Private Sub Show Click() Textl Visible True同理， Text1可见 End Sub 步骤 3：调试并运行程序，关闭程序后按题
8、目要求存盘。 二、简单应用题 2 【正确答案】 (1)【 操作步骤】 步骤 1：新建一个窗体，按照题目要求建立控件并设置相应的属性，程序中用到的控件及其属性见表 3 26和表 3 27。步骤 2：打开代码编辑窗口。在指定位置编写如下代码。 参考答案 Private Sub C1 CiiCk()显示口令 Textl PasswordChar “清空 PasswordChar的设置使密码显示 End Sub Private Sub C2 Click()隐藏口令 Textl PasswordChar “?“将 PasswordChar设置为 ?则密码显示 ? End Sub Private Sub
9、C3 Click()复制口令 Text2 Text Text1 Text End Sub 步骤3：调试并运行程序，关闭程序后按题目要求存盘。 (2)【操作步骤】 步骤 1：新建一个窗体，按照题目要求建立控件，程序中用到的控件及其属性见表 3 28。步骤 2：打开代码编辑窗口，在指定位置编写如下代码。 参考答案 Private Sub P1_C1ick() CD1 ShowOpen显示 “打开文件 “对话框 End Sub 步骤 3：调试并运行程序，关闭程序后按题目要求存盘。 三、综合 应用题 3 【正确答案】 【操作步骤】 步骤 1：打开本题工程文件，按照题目要求建立控件并设置属性，如表 3 29所示。步骤 2：打开代码编辑窗口，在代码编辑窗口指定位置编写以下代码。 参考答案 Function foundhuiwen(p As String) If StrReverse(P) P Then foundhuiwen TrueStrReverse函数的功能是将字符串顺序反转 End Function 步骤 3：调试并运行程序，关闭程序后按题目要求存盘。
