国家二级VB机试（上机操作）模拟试卷448
基本操作题
1.(1)在名称为Form1的窗体上添加一个名称为L1，标题为“业余爱好”的标签，再添加一个名称为Ch1的复选框数组，含3个复选框，它们的Index属性分别为0、1、2，标题依次为“体育”、“音乐”、“美术”，清设置复选框的属性，使其初始状态如下表所示。
程序运行后的窗体如图所示。
注意：存艇时必须存放在考生文件夹下，工程文件名为sjt1．vbp．窗体文件名保存为sjt1．frm。
(2)在名称为Form1的窗体上添加一个名称为Text1的文本框；再建立一个下拉菜单，菜单标题为“操作”，名称为M1，此菜单下含有两个菜单项，名称分别为Show和Hide，标题分别为“显示”、“隐藏”，请编写适当的事件过程，使程序运行时，单击“隐藏”菜单项，文本框消失；单击“显示”菜单项。文本框重新出现，程序运行后的窗体如图所示。要求程序中不得使用变量，每个事件过程中只能写一条语句。
注意：存盘时必须存放在考生文件夹下，工程文件名保存为sjt2．vbp．窗体文件名保存为sjt2．frm。
(1)步骤1：建立界面，按照题目要求建立一个名称为L1，Caption属性为“业余爱好”的标签和1个名称为Chl的复选框数组，包含3个复选框，并设置其相应属性，如图3．24所示。
[*]
设置其他控件相关属性，程序中用到的控件及属性见表3．24。
[*]
步骤2：调试并运行程序，关闭程序后按题目要求存盘。
(2)步骤1：新建一个“标准EXE”工程，在窗体中绘制一个文本框，在属性设置窗口中将其Name属性值设置为Text1。打开菜单编辑器，按表3．25设置建立菜单项。
[*]
步骤2：打开代码编辑窗口，在指定位置编写如下代码。
参考答案
Private Sub Hide Click()
Text1．visible=False’当用户单击了”隐藏”菜单项时，则Text1不可见
End Sub
Private Sub Show Click()
Text1．ViSible=True’同理，Text1可见
End Sub
步骤3：调试并运行程序，关闭程序后按题目要求存盘。
解析：(1)复选框有一个特殊属性就是Value属性，它的取值和用法与单选按钮有所差别。如果Value属性的值取为0，代表复选框处于未选中状态，此时复选框的选项部分是一个空白的小方块；如果Value属性的值取为1，代表复选框处于选中状态，此时复选框的选项部分是一个带有“、／”标记的小方块；若Value属性的值取为2，代表复选框处于禁止选择状态。系统默认值为0，即未选中状态。复选框是否可用通过其：Enabled属性设置。
(2)文本框的Visible属性用于设置其在运行时是否可见。通过“菜单编辑器”窗口建立菜单项。
简单应用题
2.(1)在学生文件夹下有一个工程文件sjl3．vbp(相应的窗体文件名为sjt3．frm)，在窗体上添加一个名称为List1的列表框和一个名称为Text1的文本框，如图1所示。编写窗体的MouseDown事件过程。程序运行后，如果用鼠标单击窗体，则从键盘上输入要添加到列表框中的项目(内容任意，不少于三个)；如果用鼠标右键单击窗体，则从键盘上输入要删除的项目，将其从列表框中删除。程序的运行情况如图2所示。这个程序不完整，请把它补充完整，并能正确运行。
要求：去掉程序中的注释符，把程序中的?改为适当的内容，使其正确运行，但不能修改程序中的其他部分。最后将修改后的文件按原文件名存盘。
(2)在考生文件夹下有一个工程文件sjt4．vbp(相应的窗体文件名为sjt4．frm)，其功能是通过调用过程FindMin求数组的最小值。程序运行后，在4个文本框中各输入一个整数，然后单击命令按钮，即可求出数组的最小值，并住窗体上显示出来(如图所示)。
要求：去掉程序中的注释符，把程序中的?改为正确的内容，使其实现上述功能，们不能修改程序中的其他部分。最后把修改后的文件按原文件名存盘。
(1)步骤1：打开本题工程文件，按表3．18所列在窗体画出控件并设置其属性。
[*]
步骤2：打开代码编辑窗口，去掉程序中的注释符“’”，将问号改为正确的内容。
参考答案
Private Sub Form_MouseDown(Button As Integer，Shift As Integer，X As Single，Y As Sinqle)
If Button=1 Then
Text1．Text=InputBox(\\
解析：(1)当在窗体上按下鼠标键时将触发其MouseDown事件，该事件过程的参数Button值为1时表示当前按下的是鼠标左键；当Button值为2时表示当前按下的是鼠标右键。向列表框添加项目使用Addhem方法，删除列表项使用RemoveItem方法。当执行删除操作时，本题在For循环语句中逐一判断列表中各项是否与输入内容一致，若一致则删除列表框中该项。
程序中用到了InputBox()函数，其格式为：
InputBox(prompt[，title][，default][，xpos][，ypos][，helpfile，context])
其中常用参数为prompt和title。prompt是一个字符串，其长度不得超过1024个字符，它是在对话框内显示的信息，用来提示用户输入。
title：是一个字符串，它是对话框的标题，显示在对话框顶部的标题区。
(2)文本框里的内容(包括数字)默认都是当做字符串来处理的，如果需要参与数据运算，则需先用Val()函数将其转化为数字(例如Val(Text1．Text))。CInt函数将数值转换为整型。
这里需要指出的是，利用Array对数组各元素赋值，声明数组的类型只能是Variant。
在本题的FindMin过程中，用变量Min记录最小值，最初把数组的第一个元素的值赋给Min，然后通过For循环语句将其后的元素依次与之比较，如果小于Min的值则与之交换，依次类推，最终Min的值就是数组各元素中的最小值。
在窗体上打印信息可以通过Print方法来实现，其形式为：
[对象．]Print要显示的内容
综合应用题
3.在考生文件夹下有一个工程文件sjt5．vbp，其名称为Form1的窗体上已有三个文本框Text1、Text2、Text3，以及部分程序代码，请完成以下工作。
①
本文档预览：3600字符，共5045字符，源文件无水印，下载后包含无答案版和有答案版，查看完整word版点下载
