1、VB 机试-试卷 105 及答案解析(总分：12.00，做题时间：90 分钟)一、基本操作题(总题数：2，分数：4.00)1.基本操作题（）（分数：2.00）_2.(1)在名称为 Forml 的窗体上画一个框架、一个文本框、一个命令按钮。框架的名称为 Framel，标题为“框架”。文本框在 Frame1 框架中，名称为 Text1、标题为“模拟试题”。命令按钮的名称为Commandl、标题为“屏蔽”。编写适当的事件过程，当程序运行时，如果单击 Commandl 命令按钮，框架就会被屏蔽(即不可用)。程序中不得使用任何变量。程序运行时的窗体界面如图 211 所示。 注意：保存时必须存放在考生文件
2、夹下，窗体文件名为 sjlfrm，工程文件名为 sjlvbp。 (2)在名称为 Forml的窗体中，画一个组合框。组合框的名称为 Combol，初始内容为空，有“Iteml”、“Item2”和“Item3”3 个可供选择项。编写适当的事件过程，使得程序运行时，选择组合框中的某一项，就会弹出一个对话框，内容为“选择了(该项)”。程序中不得使用任何变量。程序运行时的窗体界面如图 212 所示。 （分数：2.00）_二、简单应用题(总题数：2，分数：4.00)3.简单应用题（）（分数：2.00）_4.(1)在考生文件夹下有一个工程文件 sj3vbp，窗体上有一个单选按钮数组，名称为 Optionl，
3、含 4 个单选按钮，它们的 Index 属性分别为 O、1、2 和 3，标题依次为“Iteml”、“Itera2”、“Item3”和“Item4”，再画一个名称为 Textl 的文本框。 窗体文件中已经给出了 Optionl 的 Click 事件过程，但不完整，要求去掉程序中的注释符“”，把程序中的“?”改为正确的内容，使得在运行时单击“Iteml”或“Item2”单选按钮时，在 Textl 中显示“选择 Iteml”或“选择 Item2”，单击“Item3”或“Itern4”单选按钮时，在 Textl 中显示“Item3 被选择”和“Itern4 被选择”。程序运行界面如图353 所示。 注
4、意：不能修改程序中的其他部分。最后把修改后的文件按原文件名存盘。 (2)在考生文件夹下有一个工程文件 sj4vbp，Form1 窗体中有一个文本框，名称为 Textl，两个框架，名称分别为Framel 和 Frame2、标题分别为“科目”和“难易”；在 Framel 中有两个单选按钮 Optionl 和 Option2，标题分别为“数学”和“语文”；在 Frame2 中有两个单选按钮 Option3 和 Option4，标题分别为“困难”和“简单”；一个命令按钮，名称为 Commandl，标题为“输出”。程序运行界面如图 354 所示。（分数：2.00）_三、综合应用题(总题数：2，分数：4.
5、00)5.综合应用题（）（分数：2.00）_6.在考生文件夹下有一个工程文件 sj5vbp，窗体上有两个文本框，名称分别为 Textl 和 Text2，分别用来表示两个计数器；还有两个计时器 Timerl 和 Timer2。Timerl 用于变换 Textl 的计数；Timer2 用于控制 Text2 的计数。运行时，单击“开始”按钮后，Textl 每当到 5 的倍数则停止，Text2 开始计数，当Text2 计数到 6 的倍数则 Textl 开始计数，交替进行。程序运行时的窗体界面如图 495 所示。（分数：2.00）_VB 机试-试卷 105 答案解析(总分：12.00，做题时间：90 分
6、钟)一、基本操作题(总题数：2，分数：4.00)1.基本操作题（）（分数：2.00）_解析：2.(1)在名称为 Forml 的窗体上画一个框架、一个文本框、一个命令按钮。框架的名称为 Framel，标题为“框架”。文本框在 Frame1 框架中，名称为 Text1、标题为“模拟试题”。命令按钮的名称为Commandl、标题为“屏蔽”。编写适当的事件过程，当程序运行时，如果单击 Commandl 命令按钮，框架就会被屏蔽(即不可用)。程序中不得使用任何变量。程序运行时的窗体界面如图 211 所示。 注意：保存时必须存放在考生文件夹下，窗体文件名为 sjlfrm，工程文件名为 sjlvbp。 (2
7、)在名称为 Forml的窗体中，画一个组合框。组合框的名称为 Combol，初始内容为空，有“Iteml”、“Item2”和“Item3”3 个可供选择项。编写适当的事件过程，使得程序运行时，选择组合框中的某一项，就会弹出一个对话框，内容为“选择了(该项)”。程序中不得使用任何变量。程序运行时的窗体界面如图 212 所示。 （分数：2.00）_正确答案：(正确答案： (1)本题考查控件的画法和框架控件的使用。 框架控件(Frame)是一个容器控件，常用于将界面上的控件分组，框架内的控件将随框架一起移动或隐藏。框架的 Caption 属性设置其显示的标题，Enabled 属性设置框架及其内部控件
8、是否响应用户操作，值为 False 时将被屏蔽。需注意的是向框架中加入控件时一定要在框架区域内画，而不能通过双击加入。 根据题意，新建“标准 EXE”工程，将一个框架控件和一个命令按钮添加到窗体中，框架的 Caption 属性为“框架”，命令按钮的名称为Commandl、Caption 属性为“屏蔽”，再在 Frame 中放入一个文本框控件，名称为 Textl、Text 属性为“模拟试题”。双击 Commandl 进入代码向窗口，编写如下代码： Private Sub Commandl_Click() FramelEnabled=False将框架设为不可用 End Sub 单击 按钮运行程序，
9、并按要求保存。 (2)本题考查对组合框控件和消息框函数的掌握及简单的事件编程。 组合框(ComboBox)将文本框与列表框的特性组合在一起，既可在组合框的文本框部分输入信息，也可在列表框部分选择项目 i 组合框的列表项可以在设计阶段通过其 List 属性加入，加入时注意每输入完一项后按“Ctrl+Enter”组合键换行再输入下一项；组合框的 Text 属性用于设置或返回其文本框部分显示的文本。 MsgBox()函数用于显示提示信息，并可返回一个代表用户点击了哪个按钮的 Integer 类型值，其常用语法为：MsgBox(prompt，buttons，title)。其中，prompt 参数为消息
10、框的提示信息，buttons 参数用于控制消息框中按钮的数目、形式及消息框图标的样式；title 参数为消息框标题栏上显示的内容。 根据题意，新建“标准 EXE”工程，将一个 ComboBox 控件添加到窗体中，其名称为 Combol、Style 为 2，在 List 属性中添加以下 3 项“Iteml”、“Item2”和“Item3”。双击 Combol 进人代码窗口，编写如下代码： Private Sub Combol_Click() MsgBox(“选择了“+Combo1List(Combo1ListIndex) 弹出对话框 End Sub 单击)解析：二、简单应用题(总题数：2，分数：
11、4.00)3.简单应用题（）（分数：2.00）_解析：4.(1)在考生文件夹下有一个工程文件 sj3vbp，窗体上有一个单选按钮数组，名称为 Optionl，含 4 个单选按钮，它们的 Index 属性分别为 O、1、2 和 3，标题依次为“Iteml”、“Itera2”、“Item3”和“Item4”，再画一个名称为 Textl 的文本框。 窗体文件中已经给出了 Optionl 的 Click 事件过程，但不完整，要求去掉程序中的注释符“”，把程序中的“?”改为正确的内容，使得在运行时单击“Iteml”或“Item2”单选按钮时，在 Textl 中显示“选择 Iteml”或“选择 Item2
12、”，单击“Item3”或“Itern4”单选按钮时，在 Textl 中显示“Item3 被选择”和“Itern4 被选择”。程序运行界面如图353 所示。 注意：不能修改程序中的其他部分。最后把修改后的文件按原文件名存盘。 (2)在考生文件夹下有一个工程文件 sj4vbp，Form1 窗体中有一个文本框，名称为 Textl，两个框架，名称分别为Framel 和 Frame2、标题分别为“科目”和“难易”；在 Framel 中有两个单选按钮 Optionl 和 Option2，标题分别为“数学”和“语文”；在 Frame2 中有两个单选按钮 Option3 和 Option4，标题分别为“困难”
13、和“简单”；一个命令按钮，名称为 Commandl，标题为“输出”。程序运行界面如图 354 所示。（分数：2.00）_正确答案：(正确答案：(1)程序中需要检测单选按钮的状态，这可以通过 Value 属性来实现。如果单选按钮被选中，则其 Value 值为 1；否则 Value 值为 0。当建立控件数组时，系统给每个元素赋一个唯一的索引号(Index)，通过属性窗 VI 的 Index 属性，可以知道该控件的索引号是多少。标签和单选按钮的标题均由各自的 Caption 属性设置。 根据题意，将一组 Option 放到对话框中，包含 4 个单选按钮，Index 分别为 0、1、2 和 3，Cap
14、tion 分别为“Iteml”“Item2”“Item3”和“Item4”，一个文本框控件，名称为Textl，Text 属性为空。补充后的具体代码如下： Private Sub Optionl_Click(Index As Integer) If Index=1 Or Index=0 Then Textl Text =“选择“+OptionlItem (Index)Caption EIse Textl Text =OptionlItem (Index)Caption +“被选择“ End If End Sub 单击 按钮运行程序，并按要求保存。 (2)程序中需要检测的单选按钮的状态，通过 Va
15、lue 属性来实现，如果单选按钮被选中，则Value 值为 1，否则 Value 值为 0。在文本框中显示内容通过 Text 属性实现。 根据题意，将 2 个框架控件、4 个单选按钮控件、1 个文本框控件和 1 个命令按钮添加到窗体中，框架的 Caption 属性分别为“科目”和“难易”，单选按钮的名称分别为 Optionl、Option2、Option3 和 Option4，Caption 分别为“数学”、“语文”、“困难”和“容易”，其中 Optionl 和 Option3 的 Value 为 True，命令按钮的名称为Commandl、Caption 属性为“输出”。补充后的具体代码如下
16、： Private Sub Commandl_Click() Dim str As String str=“我觉得“ If Optionl Value =True Then str=str+Optionl Caption 选中数学 Else str=str+Option2 Caption 选中语文 End If If Option3 Value =True Then str=str+Option3 Caption 选中困难 Else str=strOption4 Caption 选中简单 End If Textl Text =str End Sub 单击 )解析：三、综合应用题(总题数：2，分
17、数：4.00)5.综合应用题（）（分数：2.00）_解析：6.在考生文件夹下有一个工程文件 sj5vbp，窗体上有两个文本框，名称分别为 Textl 和 Text2，分别用来表示两个计数器；还有两个计时器 Timerl 和 Timer2。Timerl 用于变换 Textl 的计数；Timer2 用于控制 Text2 的计数。运行时，单击“开始”按钮后，Textl 每当到 5 的倍数则停止，Text2 开始计数，当Text2 计数到 6 的倍数则 Textl 开始计数，交替进行。程序运行时的窗体界面如图 495 所示。（分数：2.00）_正确答案：(正确答案： 本题主要考查考生分析和阅读程序的能
18、力。计时器在设计时是可见的，但运行时不可见，它是否启用取决于其 Enabled 属性值，值为 True 时启用，为 False 时不启用。启用后间隔多长时间触发一次其 Timer 事件是由其 Interval 属性值决定的，IntervaI 属性的单位为毫秒，缺省值为 0，此时计时器也不启用。判断一个数是否可以被另一个数整除，要用 Mod 运算符，如果计算结果为 0，则表示可以整除，否则不能整除。补充后的代码如下： Private Sub Commandl_Click() Timerl Interval =1000按开始键启动 Textl 计数 End Sub Private Sub Time
19、rl Tliner() TextlText=TextlText+1 每个一个间隔 Textl 加 1 If TextlText Mod 5=0 Then当 Textl 的数是 5 的倍数 Timerl Interval =0 停止 Textl 计数 Timer2 Interval =1000 启动 Text2 计数 End If End Sub Private Sub Timer2_Timer() Text2Text=Text2Text+1每个一个间隔 Text2 加 1 If Text2Text Mod 6=0 Then当 Text2 的数是 6 的倍数 Timer2 Interval =0 停止 Text2 计数 Timerl Interval =1000 馆动Textl 计数 End If End Sub 单击 )解析：
