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 单击 )解析: