1、国家二级 VB机试（上机操作）模拟试卷 189及答案与解析 一、基本操作题 1 请根据以下各小题的要求设计 Visual Basic应用程序 (包括界面和代码 )。 (1)在名称为 Forml的窗体上画一个标签，名称为 L1，标题为 “业余爱好 ”，再画一个名称为 Chl的复选框数组，含三个复选框，它们的 Index属性分别为 0、 1、 2，标题依次为 “体育 ”、 “音乐 ”、 “美术 ”，请设置复选框的属性，使其初始状态见表 21。运行后的窗体如图 2 11所示。 注意：存盘时必须存放在考生文件夹下，工程文件名为 sjtl vbp，窗体文 件名为 sjtl frm。 (2)在名称为 Fo
2、rml的窗体上画一个文本框，名称为 Textl；再建立一个下拉菜单，菜单标题为 “操作 ”，名称为 M1，此菜单下含有两个菜单项，名称分别为 Show和Hide，标题分别为 “显示 ”、 “隐藏 ”，清编写适当的事件过程，使得在运行时，单击“隐藏 ”菜单项，则文本框消失；单击 “显示 ”菜单项，则文本框显示出来。运行后的窗体如图 2 12所示。要求程序中不得使用变量，每个事件过程中只能写一条语句。 注意：存盘时必须存放在考生文件夹下，翻陧文件名为 sit2 vbp，窗体文件名为 sit2 fhn。 二、简单应用题 2 (1)在名称为 Forml的窗体上画一个名称为 lblPwd的标签，标题为
3、“密令 ”；画两个文本框，名称分别为 txtPwd、 txtObj，都没有初始内容；再画三个命令按钮，名称分别为 cmdShow、 cmdHide、 cmdCopy，标题分别为 “显示 ”、 “隐藏 ”、 “复制 ”，在开始运行时，向 txtPwd中输入的所有字符都显示 “*”，单击 “显示 ”按钮后，在txtPwd中显示所有字符，再单击 “隐藏 ”后， txtPwd中的字符不变，但显示的都是“?”，单击 “复制 ”后，把 txtPwd中的实际内容复 制到 txtObi中，如图 2 40所示。 要求： 在属性窗口中，把窗体的标题改为 “密令窗口 ”。 建立适当的事件过程，完成上述功能。每个过程
4、中只允许写一条语句，且不能使用变量。存盘时，工程文件名为 vbsi3 vbp，窗体文件名为 vnsj3.frm” (2)在考生文件夹下有一个工程文件 vbsj4 vbp，运行情况如图 2 41所示。程序的功能是计算如下表达式的值： Z=(X+2)2+(X+3)3+(x+4)4+(X+N)AN 。其中， N和 X值通过键盘分别输入到文本框 txtN、 txtX中。之后如果单击名称为 cmdCa1、标题为 “计算 ”的命令按钮，则计算表达式的值 Z，并将计算结果显示在名称为 1blResult的标签中。在给出的窗体文件中已经添加了全部控件和程序，但程序不完整。要求去掉程序中的注释符，把程序中的 “
5、?”改为正确的内容。注意：考生不得修改窗体文件中已经存在的程序。程序中不得使用 运算符，而应使用函数 xn进行幂运算。程序至少运行一次，按照下图输入数据，使 N=5， X=10，单击 “汁算 ”按钮，计算 Z的值，并将结果显示在标签 lblResult中，否则没有成绩。最后，程序按原文件名存盘。 三、综合应用题 3 在考生文件夹下有一个工程文件 vbsj5 vbp，已给 出了部分控件和部分程序。请在窗体上画三个标签，其名称分别为 lblName、 11blTel和 lblPost，标题分别为 “姓名 ”、 “电话号码 ”和 “邮政编码 ”。再画三个文本框，其名称分别为 txtName、 txt
6、Tel和 txtPost，初始内容均为空白，如图 2 36所示。程序运行后，如果单击 “显示第三个记录 ”命令按钮，则读取考生文件夹下 in5 txt文件中的第三个记录，将该记录的三个字段分别显示在三个文本框中 (该文件是一个用随机存取方式建立的文件，共有 5个记录 )。单击 “保存 ”按钮，则把该记录 (三个字段 )保存到考生文 件夹下的顺序文件 out5 txt中。请编写 “显示第三个记录 ”按钮的 Click事件过程，以实现上述功能。 注意：考生不得修改已经存在的程序，必须用 “保存 ”按钮存储结果，否则无成绩。最后，按原文件名把程序存盘。 国家二级 VB机试（上机操作）模拟试卷 189
7、答案与解析 一、基本操作题 1 【正确答案】 第 1小题 【操作步骤】 步骤 1：新建一个 “标准 EXE”三程。 步骤2：在窗体 Form1中加入一个标签和一个复选框，并用 “复制 ”和 “粘贴 ”的方法，生成包含三个元素的复选框数组。 步骤 3：分别设置窗体和复选框数组 中各元素的相关属性，其属性及值如表 3-5所示。步骤 4：按要求将文件保存至考生文件夹中。 第 2小题 【操作步骤】 步骤 1：新建一个 “标准 EXE”工程，在窗体 Fonnl中画一个文木框，在属性设置窗口中将其 Name属性值设置为 Text1。 步骤 2：选择【工具】 【菜单编辑器】命令，打开菜单设计器，如表 36中
8、的设置建立菜单项。 步骤 3：打开代码编辑窗口，编写以下事件过程： 参考代码： Private Sub hideC1 ick() Textl Visible=False End Sub Private Sub showC1ick() Text1 ViSible=True End Sub 步骤 4：按要求将文件保存至考生文件夹中。 二、简单应用题 2 【正确答案】 第 1小题 【操作步骤】 步骤 1：新建一个 “标准 EXE”工程，按表3-25在窗体中画出控件并设置其相关属性。步骤 2：在代码编辑窗口，分别编写 3个按钮的单击事件过程。 参考代码： Private Sub cmdShowClic
9、k() txtPwd PasswordChar=” End Sub Private Sub cmdHide C1ick() txtPwd PasSWOrdChar=”?” End Sub Private Sub cmdCopy Click() txtObj Text=txtPwd Text End SUb 步骤 3：按要求将文件保存至考生文件夹中。 第 2小题 【操作步骤】 步骤 1：打开考生文件夹中的本题工程文件 vbsj4 vbp。在代码编辑窗口，去掉程序中的注释符 “”。将问号 “?”改为正确的内容。 参考代码： tmp=tmp*a xn=tmp Z=z+xn(t， i) iblResu
10、lt Caption=Z 步骤 2：按键运行 程序，在第 1个文奉框中输入 5，第 2个文本框中输入 10，然后单击 “计算 ”按钮。 步骤 3：按要求将文件保存至考生文件夹中。 三、综合应用题 3 【正确答案】 【操作步骤】 步骤 1：打开考生文件夹中的本题工程文件vbsj5 vbp，按表 322在窗体中画出摔什并设置其相关属性。步骤 2：住代码编辑窗口中，编写 cmdDisplay_Click事件过程。 参考代码： Private Sub cmdDisplayClick() Dim pers As PalType Open”in5 txt”For Random As#1 Len= Len(pers) Get#1， 3， pers txtName Text=pers Name txtTel Text=pers Tel txtPost Text=pers PoSt Close#1 End Sub 步骤 3：按键运行程序，先单击 “显示第三个记录 ”按钮，再单击“保存 ”按钮。 步骤 4：按要求将文件保存至考生文件夹中。
