1、VB 机试-试卷 87 及答案解析(总分：12.00，做题时间：90 分钟)一、基本操作题(总题数：2，分数：4.00)1.基本操作题（）（分数：2.00）_2.新建一个工程。在窗体中画三个标签，名称分别为 Label1、Label2 和 Label3，标题分别为“加数 1”、“加数 2”和“和”。在三个标签下分别有三个文本框(名称分别为 Textl、TexQ 和 Text3)用来输入数字。要求编写一个事件过程，程序运行后在文本框 Text1 和 Text2 中输入数字，单击文本框删后其中输出两个数的和。如图 14 所示。程序中不得使用任何变量。 注意：存盘时必须存放在考生文件夹下，工程文件名
2、为 ylc2.vbp，窗体丈件名为 ylc2.frm。 （分数：2.00）_二、简单应用题(总题数：2，分数：4.00)3.简单应用题（）（分数：2.00）_4.(1)在名称为 Form1 的窗体上建立两个主菜单，其标题分别为“文件”和“帮助”，名称分别为 vbFile和 vbHelp，“文件”菜单下有三个子菜单项，标题分别为“新建”、“打开”和“存盘”，名称分别为vbNew、vbOpen 和 vbSave。要求程序运行后，如果选中“文件”下的某个菜单项，则通过 MsgBox 对话框显示该菜单项的标题，如图 474 所示。 注意：保存时必须存放在考生文件夹下，窗体文件名为sj3frm，工程文件
3、名为 sj3vbp。 (2)在考生文件夹中有一个工程文件 sj4vbp，相应的窗体文件为sj4frm。在名为 Form1 的窗体上有一个命令按钮(名称为 Cmdl，标题为“求和”)，其功能是产生 30 个01000 的随机整数，放入一个数组中，然后输出它们的和。程序运行后，单击命令按钮，即可求出其和，并在窗体上显示出来，如图 475 所示。 （分数：2.00）_三、综合应用题(总题数：2，分数：4.00)5.综合应用题（）（分数：2.00）_6.在考生目录下有一个工程文件 sj5vbp，其窗体上有两个标签 L1 和 L2，标题分别为“口令”和“允许次数”；一个命令按钮 C1，标题为“确定”；两
4、个文本框，名称分别为 Text1 和 Text2。其中 Text1 用来输人口令(输入时，文本框内容显示“*”)，初始内容为空；Text2 的初始内容为 3。并给出了 Cl 的事件过程，但不完整，要求去掉程序中的注释符“”，把程序中的“?”改为正确的内容，使得程序运行时，在 Text1 中输人口令后，单击“确定”，如果输入的是“123456”则在 Text1 中显示“口令正确”；如果输入其他内容，单击“确定”后，弹出错误提示对话框(如图 686 所示)，并且 Text2 中的数字减 1。最多可输入 3 次口令，若 3 次都输入错误，则禁止再次输入。 （分数：2.00）_VB 机试-试卷 87
5、答案解析(总分：12.00，做题时间：90 分钟)一、基本操作题(总题数：2，分数：4.00)1.基本操作题（）（分数：2.00）_解析：2.新建一个工程。在窗体中画三个标签，名称分别为 Label1、Label2 和 Label3，标题分别为“加数 1”、“加数 2”和“和”。在三个标签下分别有三个文本框(名称分别为 Textl、TexQ 和 Text3)用来输入数字。要求编写一个事件过程，程序运行后在文本框 Text1 和 Text2 中输入数字，单击文本框删后其中输出两个数的和。如图 14 所示。程序中不得使用任何变量。 注意：存盘时必须存放在考生文件夹下，工程文件名为 ylc2.vbp
6、，窗体丈件名为 ylc2.frm。 （分数：2.00）_正确答案：(正确答案：Visual Basic 集成环境中，执行“文件”“新建工程”命令，选择“标准Exe”。创建窗体 Form1。 (2)在工具箱中选择标签控件，在窗体中要求位置画出 3 个标签，其 Caption属性分别为“加数 1”、“加数 2”和“和”。 (3)在工具箱中选择文本框控件，在窗体上创建 3 个文本框。双击文本框 Text3 弹出代码窗口，添加代码： Private Sub Text3 click() Text3=Val(Text1)+Val(Text2) End Sub (4)按 F5 键运行程序。如图 14 所示。
7、 (5)执行“文件”“保存工程”命令，将工程文件命名为 yle2.vbp，窗体文件命名为 ylc2.frm。)解析：解析：(2)第 2 小题中，利用 Val 函数将输入的字符串转换为数值进行计算。二、简单应用题(总题数：2，分数：4.00)3.简单应用题（）（分数：2.00）_解析：4.(1)在名称为 Form1 的窗体上建立两个主菜单，其标题分别为“文件”和“帮助”，名称分别为 vbFile和 vbHelp，“文件”菜单下有三个子菜单项，标题分别为“新建”、“打开”和“存盘”，名称分别为vbNew、vbOpen 和 vbSave。要求程序运行后，如果选中“文件”下的某个菜单项，则通过 Msg
8、Box 对话框显示该菜单项的标题，如图 474 所示。 注意：保存时必须存放在考生文件夹下，窗体文件名为sj3frm，工程文件名为 sj3vbp。 (2)在考生文件夹中有一个工程文件 sj4vbp，相应的窗体文件为sj4frm。在名为 Form1 的窗体上有一个命令按钮(名称为 Cmdl，标题为“求和”)，其功能是产生 30 个01000 的随机整数，放入一个数组中，然后输出它们的和。程序运行后，单击命令按钮，即可求出其和，并在窗体上显示出来，如图 475 所示。 （分数：2.00）_正确答案：(正确答案：(1)本题主要考查菜单编辑器的使用。在 Visual Basic 中，菜单项通过菜单编辑
9、器来建立；选择菜单则是触发其 Click 事件。MsgBox 函数在对话框中显示消息，等待用户单击按钮，并返回一个 Integer 告诉用户单击哪一个按钮。 语法：MsgBox(promptbuttons，title，helpfile，context) MsgBox 函数的语法具有以下几个命名参数： prompt：必需参数；字符串表达式，作为显示在对话框中的消息。 buttons：可选参数；数值表达式是值的总和，指定显示按钮的数目及形式。 title：可选参数；在对话框标题栏中显示的字符串表达式。如果省略 title，则将应用程序名放在标题栏中。 helpfile：可选参数；字符串表达式，识别
10、用来向对话框提供上下文相关帮助的帮助文件。context：可选参数；数值表达式，通过帮助文件的作者指定给适当的帮助主题的上下文编号。 建立菜单项；程序中用到的菜单项及其属性见下表： )解析：三、综合应用题(总题数：2，分数：4.00)5.综合应用题（）（分数：2.00）_解析：6.在考生目录下有一个工程文件 sj5vbp，其窗体上有两个标签 L1 和 L2，标题分别为“口令”和“允许次数”；一个命令按钮 C1，标题为“确定”；两个文本框，名称分别为 Text1 和 Text2。其中 Text1 用来输人口令(输入时，文本框内容显示“*”)，初始内容为空；Text2 的初始内容为 3。并给出了
11、Cl 的事件过程，但不完整，要求去掉程序中的注释符“”，把程序中的“?”改为正确的内容，使得程序运行时，在 Text1 中输人口令后，单击“确定”，如果输入的是“123456”则在 Text1 中显示“口令正确”；如果输入其他内容，单击“确定”后，弹出错误提示对话框(如图 686 所示)，并且 Text2 中的数字减 1。最多可输入 3 次口令，若 3 次都输入错误，则禁止再次输入。 （分数：2.00）_正确答案：(正确答案：本题主要考查文本框的 Text、PasswordChar 和 Enabled 属性，&连接符以及MsgBox()函数。根据题意将文本框控件 Text1 的 PasswordChar 属性设置为“*”。双击进入代码窗口，编写如下代码： Private Sub C1_Click() If Text1Text =“123456“Then Text1.Text=“口令正确“ Text1 PasswordChar =“ Else Text2Text=Text2Text-1 If Text2Text0 Then MsgBox“第“&(3-Text2Text)&“次 13 令错误，请重新输入“ Else MsgBox“3 次输入错误，请退出“ Text1Enabled= False End If End If End Sub 单击 )解析：
