1、VB机试模拟试卷 62及答案与解析 一、基本操作题（ 30分） 1 (1)在名称为 Forml的窗体上建立一个名称为 Optionl的单选按钮数组，含四个单选按钮，它们的标题依次为 “Iteml”、 “Item2”、 “Item3”和 “Item4”，其下标分别为0、 1、 2和 3，程序运行时， “Itern3”为选中状态，如图 481所示。 注意：存盘时必须存放在考生文件夹下，工程文件名为 sjl vbp，窗体文件名为 sjl frm。 (2)在窗体上建立一个二级菜单，第一级含两个菜单项，标题分别为 “文件 ”和 “帮助 ”，名称分别 为 file和 help。其中 “文件 ”菜单含有四个
2、子菜单，其标题依次为 “打开 ”、 “保存 ”、 “另存为 ”和 “关闭 ”，名称分别为 open、 save、 saveas和 close，窗体运行界面如图 482所示。 注意：存盘时必须存放在考生文件夹下，工程文件名为 sj2 vbp，窗体文件名为 sj2 frm。 二、简单应用题（ 40分） 2 (1)在名称为 Form1的窗体上添加一个名称为 Label1、标题为 “添加项目： ”的标签；添加一个名称为 Textl的文本框，初始内容为空；添加一个名称为 Combol的下拉式组合框，并通过属性 窗口输入若干项目 (不少于 3个，内容任意 )；再添加两个命令按钮，名称分别为 Command
3、l、 Command2，其标题分别为 “添加 ”、 “统计 ”。在程序运行时，向 Textl中输入字符，单击 “添加 ”按钮后，则将 Textl中的内容作为一个列表项被添加到组合框的列表中；单击 “统计 ”按钮，则在窗体空白处显示组合框中列表项的个数，如图 93所示。请编写两个命令按钮的 C1ick事件过程。 注意：程序中不得使用变量，也不能使用循环结构。存盘时必须存放在考生文件夹下，工程文件名保存为 sj3 vbp，窗体文件名保存为 sj3 frm。 (2)在考生文件夹下有一个工程文件 sj4 vbp，其窗体如图 94所示。该程序用来对在上面的文本框中输入的英文字母串 (称为 “明文 ”)加
4、密，加密结果 (称为 “密文 ”)显示在下面的文本框中。加密的方法为：选中一个单选按钮，单击 “加密 ”按钮后，根据选中的单选按钮后面的数字 n，将 “明文 ”中的每个字母改为它后面的第 n个字母 (“z”后面的字母认为是 “a”， “Z”后面的字母认为是 “A”)，如图 94所示。窗体中已经给出了所有控件和程序，但程序不完整，请去掉程序中的注释符 (即 “”)，把程序中的“?”改为正确的内容。 注意：不得修改程序中的其他部分和控件的属性。最后将修改后的文件按原文件名存盘。 三、综合应用题（ 30分） 3 在考生文件夹下有工程文件 sj5 vbp及窗体文件 sj5 frm，另有两个图片，名称为
5、笑脸与哭脸。窗体及其控件属性都设置完毕，但缺少程序代码，要求考生编写适当的代码，以实现下面描述的功能。存盘时不得改变文件名和文件夹。 本题描述如下：在名称为 Forml的窗本上有两个命令按钮，两个文本框与两个图片框。其中图片框控件的 AutoSize属性为 True，名称分别为 Pic1与 Pic2；两个命令按钮的名称分别 为 Commandl与 Command2，标题分别为 “加 1”与 “减 1”；两个文本框名称分别为 Textl和 Text2， Textl的 Text属性为 “李明 ”， Text2的 Text属性为 “0”。程序运行时， “减 1”按钮不可用，单击 “加 1”按钮， T
6、ext2内的计数加 l， “减 1”按钮变为可用，同时图片框中显示笑脸图片。单击 “减 1”按钮， Text2内的计数减 1，当计数减到 0时， Command2不可用，同时图片框中显示哭脸图片。程序运行时的窗体界面如图 145所示。 注意：考生不得修改程序控件及控件的属性，最后应把修改的文件按 原文件名存盘。 VB机试模拟试卷 62答案与解析 一、基本操作题（ 30分） 1 【正确答案】 (1)建立控件数组有多种方法，考生可以选择任何一种来建立单选按钮数组。 Value属性用来设置单选按钮的状态，它的值可以是 True或 False，当设置为 True时，该单选按钮为选中，否则没有选中。 根
7、据题意，新建 “标准 EXE”工程，将 4个单选按钮控件添加到窗体中，其名称都为 Optionl、 Index属性分别为0、 1、 2、 3、 Caption属性分别为 “Iteml”、 “Item2”、 “Item3”和 “Item4”，其 中 Item3的 Value值为 True，设置完成，单击 按钮运行程序，并按要求保存。 (2)根据题意，新建 “标准 EXE”工程，选择 “工具 ”“ 菜单编辑器 ”命令，或按 “Ctrl+E”组合键，或单击窗体空白处，在弹出的快捷菜单中选择 “菜单编辑器 ”命令，打开 “菜单编辑器 ”对话框，在其中添加以下菜单项：单击 “确定 ”按钮，设置完成，单击
8、按钮运行程序，并按要求保存。 二、简单应用题（ 40分） 2 【正确答案】 (1)本题主要考查命令按钮的 Caption和 Name属性，下拉式组合框的 Caption、 Name、 List和 ListCount属性，文本框的 Text和 Name属性，标签的Caption和 Name属性，下拉式组合框的 AddItem方法以及窗体的 Print方法。 根据题意，新建 “标准 EXE”工程，将一个标签控件、文本框控件、下拉式组合框控件、 2个命令按钮控件添加到窗体中，其中标签控件 Caption属性为 “添加项目： ”，文本框控件名称为 Textl， Text属性为空，下拉式组合框控件名称为
9、Combol， List属性为 “中国古巴英国 ”，命令按钮控件的名称分别为 Commandl和Command2， Caption属性分别为 “添加 ”和 “统计 ”。双击进入代码窗口，编写如下代码： Private Sub Commandl Click() Combo1 Addltem Text1 End Sub Private Sub Command2_Click() Print Combo1 ListCount End Sub 单击 按钮运行程序，并按要求保存。 (2)根据题意，打开本题工程文件，打开代码编辑窗 13，去掉程序中 的注释符 “”，将问号改为正确的内容，编写如下代码： Pr
10、ivate Sub Commandl_Click() Dim n As Integer， k As Integer， m As Integer Dim c As String， a As String For k=0 To 2 If Opl(k) Value Then n=Val(Opl(k).Caption) End If Next k m=Len(Textl Text) a=“ For k=1 To m c=Mid$(Textl Text， k， 1) c=String(1， Asc(c)+n) 1f c“z“Or c“Z“And c 按钮运行程序，并按要求保存。 三、综合应用题（ 30分
11、） 3 【正确答案】 本题重点考查控件的显示与隐藏、有效与无效功能的实现。 Visible属性用于设置控件是否可见。值为 True表示可见，值为 False表示不可见；Enabled属性用于设置控件是否有效，值为 True表示有效，值为 False表示无效 (即灰色 )；文本框的 Text属性用于设置或返回其显示的文本内容； Val()函数用于将字符串中的数字字符转换为数值。 本题大意 是：当给张三加一时露笑脸，给张三减一时露哭脸。为了实现笑脸与哭脸的交替，可以让两个图片框分别装载笑脸与哭脸图片，然后让它们重合，单击 “加 1”时，装载笑脸的图片框 Visible属性值为True，装载哭脸的图
12、片框 Visible属性值为 False；单击 “减 1”时，执行相反的操作，即可得到题目要求的功能。程序运行时，在 Form_Load事件过程中将 “减 1个 ”按钮设为无效；用 IF语句判断 Text2中的数是否减到 0。 编写如下代码： Private Sub Command1_Click() Picl Visible=True Pic2 Visible=False Text2 Text=Val(Text2 Text)+1 Command2 Enabled=True End Sub Private Sub Command2_Click() Pic2 Visible=True Picl Visible=False Text2 Text=Val(Text2 Text)-1 If Text2 Text=“0“Then Command2 Enabled=False End Sub Private Sub Form_Load() Command Enabled=False End Sub单击 按钮运行程序，并按要求保存。
