1、VB 机试-试卷 68 及答案解析(总分:8.00,做题时间:90 分钟)一、基本操作题(总题数:2,分数:4.00)1.基本操作题()(分数:2.00)_2.有一个工程文件 ylc5.vbp,窗体上有一个单选按钮数组,含 3 个没有标题的单选按钮。为单选按钮添加标题“语文”、“数学”、“英语”;再添加一个标题为“显示”的命令按钮,运行后将根据单选按钮的选中情况,在窗体上显示“我喜欢语文”、“我喜欢数学”、“我喜欢英语”。要求单选按钮的初始值为英语。运行后如图 21 所示。注意:存盘时必须存放在考生文件夹下,工程文件名为 ylc5.vbp,窗体文件名为 ylc5.frm。 (分数:2.00)_
2、二、简单应用题(总题数:2,分数:4.00)3.简单应用题()(分数:2.00)_4.有一个工程文件 ylc6.vbp。请在窗体上画一个文本框,其名称为 Text1;画一个命令按钮,名称为Command1,标题为“确定”。再画 5 个单选按钮,名称分别为 option1、Option2、 Option3、Option4和 Option5,标题分别为“飞机”、“火车”、“汽车”、“自行车”和“步行”,如图 26 所示。编写适当事件过程。选中一个单选按钮,并单击“确定”按钮,按照表 3-1 在文本框中显示相应的内容。 (分数:2.00)_VB 机试-试卷 68 答案解析(总分:8.00,做题时间:
3、90 分钟)一、基本操作题(总题数:2,分数:4.00)1.基本操作题()(分数:2.00)_解析:2.有一个工程文件 ylc5.vbp,窗体上有一个单选按钮数组,含 3 个没有标题的单选按钮。为单选按钮添加标题“语文”、“数学”、“英语”;再添加一个标题为“显示”的命令按钮,运行后将根据单选按钮的选中情况,在窗体上显示“我喜欢语文”、“我喜欢数学”、“我喜欢英语”。要求单选按钮的初始值为英语。运行后如图 21 所示。注意:存盘时必须存放在考生文件夹下,工程文件名为 ylc5.vbp,窗体文件名为 ylc5.frm。 (分数:2.00)_正确答案:(正确答案:1操作步骤 (1)在 Visual
4、 Basic 集成环境中选择“文件”“打开工程”命令,在对话框中选择 ylc5.vbp 工程文件,单击“确定”按钮打开。 (2)在工具箱中选择 OptionButton 控件,分别在窗口中创建 3 个,都命名为 Option1。 Visual Basic 提示是否建立单选控件数组,选择确定。在属性窗口中其名称(Name)分别为 Option(0)、Option(1)、Option(2),标题(Caption)分别为“语文”、“数学”和“英语”。 (3)根据题目要求,在属性窗口设置标题为英语的控件 Option(2)的 Value 属性为True,表示其初始值是英语。 (4)选择命令按钮,设置名
5、称(Name)为 Command1,标题(Caption)为“显示”。 1行为编码 选择 Command1 对象和 Click 事件,命令按钮的事件过程代码如下: Private Sub Command1_Click() 清除窗体上所有的图形和文本 Form1.Cls For i=0 To Option1.Count-1 If Optionl.Item(i).Value Then 使用控件的 Caption 属性显示名称,进行字符串连接后显示在窗体上 Form1.Print(“我喜欢“ & Option1. Item(i).Caption) End If Next i End Sub 3存盘保
6、存 执行“文件”“保存工程”命令,工程文件名为 ylc5.vbp,窗体文件名为 ylc5.frm。)解析:解析:(1)本题考查单选按钮控件组的处理。通过循环判断每次选择的单选按钮,在窗体上显示相应的标题字符的组合。(2)注意 OptionButton 控件数组的建立、For 循环语句、Form 对象的 Print 方法。(3)在 For 循环中检测当前单选按钮数组的值,连接字符串,通过 Print 方法打印在窗体上。二、简单应用题(总题数:2,分数:4.00)3.简单应用题()(分数:2.00)_解析:4.有一个工程文件 ylc6.vbp。请在窗体上画一个文本框,其名称为 Text1;画一个命
7、令按钮,名称为Command1,标题为“确定”。再画 5 个单选按钮,名称分别为 option1、Option2、 Option3、Option4和 Option5,标题分别为“飞机”、“火车”、“汽车”、“自行车”和“步行”,如图 26 所示。编写适当事件过程。选中一个单选按钮,并单击“确定”按钮,按照表 3-1 在文本框中显示相应的内容。 (分数:2.00)_正确答案:(正确答案:1操作步骤 (1)在 Visual Basic 集成环境选择“文件”“打开工程”命令,在对话框中选择 ylc6.vbp 工程文件,单击“确定”按钮打开。 (2)在工具箱中选择 TextBox 控件,在窗体中创建命
8、名为 Text1。在属性窗口分别设置属性为空。 (3)从工具箱中选择选项控件,在窗体中拖动创建,在属性窗口分别命名为 Option1、 Option2、Option3、Option4 和 Option5,标题分别为“飞机”、“火车”、“汽车”、“自行车”和“步行”。 (4)通过工具箱创建命令按钮,命名为 Command1,标题为“确定”。 2行为编码 补充后 Command1 对象的 Click 事件的完整代码如下: Private Sub Command1_Click() If Option1.Value Then Text1.Text=“需要 1 小时“ End If If Option2
9、. Value Then Text1.Text=“需要 10 小时“ End If If Option3.Value Then Text1.Text=“需要 20 小时“ End If If Option4.Value Then Text1.Text=“需要 100 小时“ End If If Option5.Value Then Text1.Text=“需要500 小时“ End If End Sub 3存盘保存 执行“文件”“保存工程”命令,工程文件名为 yle6.vbp,窗体文件名为 ylc6.frm。)解析:解析:(1)这是一道简单的应用题,主要考查 OptionButton 控件的应用能力。在编程中使用判定的控制流程,显示出不同的结果信息。(2)上面的控制流程使用 3 个 If,ThenEnd If,分别判断3 个单选按钮是否被选中。判断后在文本框中显示相应的信息。