1、VB 机试-试卷 30 及答案解析(总分：12.00，做题时间：90 分钟)一、基本操作题(总题数：2，分数：4.00)1.基本操作题（）（分数：2.00）_2.(1)在名称为 Forml 的窗体上画一个标签，名称为 Labell，标签上显示“密码”，在标签的右边画一个文本框，名称为 Textl，其宽和高分别为 1 600 和 350，设置适当的属性使得在输入密码时，文本框中显示“*”字符，另外再把窗体的标题设置为“输入密码”，以上这些设置都只能在属性窗口中进行设置，运行时的窗体如图 251 所示。 注意：存盘时必须存放在考生文件夹下，工程文件名为 sjlvbp，窗体文件名为 sjlfrm。
2、(2)在名称为 Forml 的窗体上画一个图片框，名称为 Picl。请编写适当的事件过程，使得在运行时，每单击窗体一次就在窗体中输出“窗体”一次，每单击图片框一次，就在图片框中输出“图片框”一次，如图 252 所示。要求程序中不得使用变量，每个事件过程中只能写一条语句。（分数：2.00）_二、简单应用题(总题数：2，分数：4.00)3.简单应用题（）（分数：2.00）_4.注意：下面出现的“考生文件夹”均为 c:/wexam/25160001。 (1)在考生文件夹中有工程文件 sjt3.vbp及其窗体文件 sjt3.frm，该程序是不完整的，请在有?号的地方填入正确内容，然后删除?及所有注释符
3、(即号)但不能修改其他部分。存盘时不得改变文件名和文件夹。 本题描述如下： 在窗体上有一个名称为 Text1 的文本框，一个名称为 C1，标题为“校验”的命令按钮。其中文本框用来输入口令，如图 5-3所示，要求在文本框中输入的内容都必须以“”显示(请考生通过属性窗口设置)。要求程序运行后，输入口令，单击命令按钮后，对口令进行校验。如果输入的内容是“ABC”这 3 个大写字母，则用 MsgBox 信息框输出“正确”，否则输出“错误”，如图 5-4 所示。 (2)在考生文件夹中有工程文件 sjt4.vbp 及其窗体文件 sjt4.frm，该程序是不完整的，请在有?号的地方填入正确内容，然后删除?及
4、所有注释符(即号)但不能修改其他部分。存盘时不得改变文件名和文件夹。 本题描述如下： 在窗体上有 3 个名称分别为Ch1、Ch2 和 Ch3 的复选框，标题依次为“程序设计”、“数据库原理”和“计算机网络”，还有一个名称为 C1，标题为“选课”的命令按钮，如图 5-5 所示。要求程序运行后，如果选择某个复选框，当单击命令按钮时在窗体上输出相应的信息。例如：如果选择“程序设计”和“数据库原理”复选框，单击命令按钮后，将在窗体上显示“我选的课程是程序设计数据库原理”。 （分数：2.00）_三、综合应用题(总题数：2，分数：4.00)5.综合应用题（）（分数：2.00）_6.在考生文件夹下有一个工程
5、文件 sj5vbp，在该工程中为考生提供了一个通用过程，考生可以直接调用。请在窗体上画一个名称为 Textl 的文本框；画一个名称为 Commandl、标题为“计算显示”的命令按钮；再画两个单选按钮，名称分别为 Optionl 和 Option2、标题分别为“求 100 到 250 之间能被 5 整除的数的个数”和“求 300 到 400 之间能被 6 整除的数的个数”，如图 625 所示。 （分数：2.00）_VB 机试-试卷 30 答案解析(总分：12.00，做题时间：90 分钟)一、基本操作题(总题数：2，分数：4.00)1.基本操作题（）（分数：2.00）_解析：2.(1)在名称为 F
6、orml 的窗体上画一个标签，名称为 Labell，标签上显示“密码”，在标签的右边画一个文本框，名称为 Textl，其宽和高分别为 1 600 和 350，设置适当的属性使得在输入密码时，文本框中显示“*”字符，另外再把窗体的标题设置为“输入密码”，以上这些设置都只能在属性窗口中进行设置，运行时的窗体如图 251 所示。 注意：存盘时必须存放在考生文件夹下，工程文件名为 sjlvbp，窗体文件名为 sjlfrm。 (2)在名称为 Forml 的窗体上画一个图片框，名称为 Picl。请编写适当的事件过程，使得在运行时，每单击窗体一次就在窗体中输出“窗体”一次，每单击图片框一次，就在图片框中输出
7、“图片框”一次，如图 252 所示。要求程序中不得使用变量，每个事件过程中只能写一条语句。（分数：2.00）_正确答案：(正确答案：(1)在设置属性时标签的名称由 Name 属性设置，内容由 Caption 属性设置。窗体的标题由窗体的 Caption 属性设置。要使文本框中输入的字符以“*”号显示，可以将 PasswordChar 属性设置为“*”。 根据题意，新建“标准 EXE”工程，将一个标签和一个文本框控件添加上窗体中，标签的名称为 Labell、Caption 属性为“密码”，文本框的名称为 Textl、Text 属性为空，PasswordChar 属性为“*”、Height 属性为
8、 350、width 属性为 1 600，Forml 的 Caption 属性为“输入密码”，设置完成后，单击 按钮运行程序，并按要求保存。 (2)单击窗体时触发 Form_Click 事件，单击图片框时触发Picl_Click 事件。在对象中打印信息使用 Print 方法，其语法格式为：对象Print。省略对象时指在窗体上打印。 根据题意，新建“标准 EXE”工程，将一个图片控件添加到窗体中，其名称为 Picl，双击Picl 进入代码窗口，编写如下代码： Private Sub Form_Click() Print“窗体“ 单击窗体 End Sub Private Sub Pic1_Clic
9、k() PiclPrint“图片框“ 单击图片框 End Sub 单击 )解析：二、简单应用题(总题数：2，分数：4.00)3.简单应用题（）（分数：2.00）_解析：4.注意：下面出现的“考生文件夹”均为 c:/wexam/25160001。 (1)在考生文件夹中有工程文件 sjt3.vbp及其窗体文件 sjt3.frm，该程序是不完整的，请在有?号的地方填入正确内容，然后删除?及所有注释符(即号)但不能修改其他部分。存盘时不得改变文件名和文件夹。 本题描述如下： 在窗体上有一个名称为 Text1 的文本框，一个名称为 C1，标题为“校验”的命令按钮。其中文本框用来输入口令，如图 5-3所示
10、，要求在文本框中输入的内容都必须以“”显示(请考生通过属性窗口设置)。要求程序运行后，输入口令，单击命令按钮后，对口令进行校验。如果输入的内容是“ABC”这 3 个大写字母，则用 MsgBox 信息框输出“正确”，否则输出“错误”，如图 5-4 所示。 (2)在考生文件夹中有工程文件 sjt4.vbp 及其窗体文件 sjt4.frm，该程序是不完整的，请在有?号的地方填入正确内容，然后删除?及所有注释符(即号)但不能修改其他部分。存盘时不得改变文件名和文件夹。 本题描述如下： 在窗体上有 3 个名称分别为Ch1、Ch2 和 Ch3 的复选框，标题依次为“程序设计”、“数据库原理”和“计算机网络
11、”，还有一个名称为 C1，标题为“选课”的命令按钮，如图 5-5 所示。要求程序运行后，如果选择某个复选框，当单击命令按钮时在窗体上输出相应的信息。例如：如果选择“程序设计”和“数据库原理”复选框，单击命令按钮后，将在窗体上显示“我选的课程是程序设计数据库原理”。 （分数：2.00）_正确答案：(正确答案：(1)在窗体上建立好控件后，先设置控件属性，再编写事件过程。 单击命令按钮或窗体触发的是 Click 事件，因此，程序中应该编写命令按钮的 Click 事件过程，按钮的标题通过Caption 属性设置；要使文本框的内容在输入时显示为“*”，则应该将 PasswordChar 属性设置为“*”
12、。解题步骤： 第一步：建立界面并设置控件属性。程序中用到的控件及其属性见表 5-3。 第二步：编写程序代码。 程序提供的代码： Option Explicit Private Sub C1_Click() If Text1.Text = “?“ Then MsgBox “?“ Else MsgBox “错误” End Sub 参考代码： Option Explicit Private Sub C1_Click() If Text1.Text = “ABC“ Then MsgBox “正确” Else MsgBox “错误“ End Sub 第三步：调试并运行程序。 第四步：按题目要求存盘。 (
13、2)建立好控件后，先设置控件属性，再编写事件过程。 复选框用来表示状态，在程序运行期间可以改变其状态。复选框的标题由 Caption 属性来设置，复选框的Value 属性用来表示复选框的状态。其取值有如下几种： 0：表示复选框未被选中； 1：表示选中该复选框； 2：表示该复选框被禁止(灰色)。 在窗体上打印信息用 Print 方法，单击命令按钮触发的是 Click事件。解题步骤： 第一步：建立界面并设置控件属性。程序中用到的控件及其属性见表 5-4。 )解析：三、综合应用题(总题数：2，分数：4.00)5.综合应用题（）（分数：2.00）_解析：6.在考生文件夹下有一个工程文件 sj5vbp，
14、在该工程中为考生提供了一个通用过程，考生可以直接调用。请在窗体上画一个名称为 Textl 的文本框；画一个名称为 Commandl、标题为“计算显示”的命令按钮；再画两个单选按钮，名称分别为 Optionl 和 Option2、标题分别为“求 100 到 250 之间能被 5 整除的数的个数”和“求 300 到 400 之间能被 6 整除的数的个数”，如图 625 所示。 （分数：2.00）_正确答案：(正确答案：根据题意，将一个文本框控件，两个单选按钮控件和一个命令按钮添加到窗体中，文本框的名称为 Textl，单选按钮的名称：分别为 Optionl 和 Option2，Caption 分别为
15、“求 100 到 250之间能被 5 整除的数的个数”和“求 300 到 400 之间能被 6 整除的数的个数”，命令按钮的名称为Commandl，Caption 属性为“计算显示”，设置完成后，双击 Commandl 进入代码窗口，补充后的具体代码如下： Private Sub Commandl_Click() Dim rain As Integer下限 Dim max As Integer上限 Dim i As Integer循环计数 Dim mum As Integer个数 Dim tmp As Integer除数 If Optionl Value =True Then 选中 Optionl 时 min=100 max=250 tmp=5 Else选中 Option2 时 rain=300 max=400 tmp=3 End If num=0 For i=min To max利用循环来逐个判断 If i Mod tmp=0 Then num=num+1 如果能被除数整除，则个数加 1 End If Next i Textl Text =hum在 Textl 文本框中显示出来 Open“AppPath&out5txt“For Output As#1 Print#1，TextlText Close#1 End Sub 单击 )解析：
