问题 问答题

有一个工程文件ylc6.vbp,窗体上已经有两个文本框,名称分别为Text1、Text2。在窗体上创建一个命令按钮,名称为Command1,标题为“确定”。画两个单选按钮,分别为“王老师”、“林老师”;再画两个复选框,名称分别为Check1、Check2,标题分别为“语文”、“数学”。编写适当的事件过程,使得在运行时,单击“确定”按钮后实现下面的要求。
根据选中的单选按钮,在Text1中显示“我是王老师”或“我是林老师”。
根据选中的复选框,在Text2中显示“我教语文”、“我教数学”、“我教语文数学”,如图 24所示。
注意:存盘时必须存放在考生文件夹下,工程文件名为ylc6.vbp,窗体文件名为ylc6.frm。

答案

参考答案:1.操作步骤
(1)在Visual Basic集成环境选择“文件”→“打开工程”命令:在对话框中选择ylc6.vbp工程文件,单击“确定”按钮打开。
(2)在工具箱中选择OptionButton,在窗体上创建两个单选按钮命名为Option1和 Option2。在属性窗口中分别设置按钮的标题为“王老师”和“林老师”。在同一个窗体上创建,因此只能二选一。
(3)在工具箱中选择CheckBox控件,在窗体上创建两个复选按钮,命名为Check1和Check2。在属性窗口中,设置标题为“语文”、“数学”。
(4)根据题目要求,创建命令按钮命名为Command1,在属性窗口设置其标题为“确定”。
2.行为编码
在代码窗口设置选择Command1和Click事件代码,其行为代码如下:
Private Sub Command1_C1ick()
If option1. Value Then
Text1.Text="我是"& Optionl.Caption
Else
Text1.Text="我是" & Option2.Caption
End If
If(Check1.Value And Check2.Value)Then
Text2.Text="我教" & Check1.Caption & Check2. Caption
ElseIf Check1.Value Then
Text2.Text="我教" &Check1.Caption
ElseIf Check2.Value Then
Text2.Text="我教"& Check2.Caption
Else
Text2.Text=" "
End If
End Sub
3.存盘保存
执行“文件”→“保存工程”命令,工程文件名为ylc6.vbp,窗体文件名为ylc6.frm。

解析: (1)本题考查考生对单选按钮和复选按钮功能的使用,比较单选按钮和复选按钮的不同之处。
(2)注意OptionButton控件、CheckBox控件的使用,命令按钮的行为编码以及字符串的连接操作。
(3)该代码根据题目的要求,通过If语句判断当前单选按钮的Value属性的值和复选按钮属性的值。通过“&”连接字符串,并通过TextBox控件的Text属性显示。

填空题
单项选择题