(1)在考生文件夹下有一个工程文件sjt3.vbp,请在窗体上画两个框架,其名称分别为Fl和F2,标题分别为“交通工具”和“到达目标”。在Fl中画两个单选按钮,名称分别为Opl和Op2,标题分别为“飞机”和“火车”。在F2中画两个单选按钮,名称分别为Op3

admin2010-09-02  35

问题 (1)在考生文件夹下有一个工程文件sjt3.vbp,请在窗体上画两个框架,其名称分别为Fl和F2,标题分别为“交通工具”和“到达目标”。在Fl中画两个单选按钮,名称分别为Opl和Op2,标题分别为“飞机”和“火车”。在F2中画两个单选按钮,名称分别为Op3和Op4,标题分别为“广州”和“昆明”。然后画一个命令按钮,其名称为cl,标题为“确定”。再画一个标签,其名称为Labl。编写适当的事件过程。程序运行后,选择不同的单选按钮并单击“确定”按钮后在标签框中显示的结果见表1-6。

程序的运行情况如图1-188所示。存盘时,工程文件名为sjt3.vbp,窗体文件名为sjt3.frm。
注意:考生不得修改窗体文件中已经存在的程序,在结束程序运行之前,必须至少进行上面的一种操作。退出程序时必须通过单击窗体右上角的关闭按钮。

(2)在考生文件夹下有一个工程文件sjt4.vbp,请在窗体上画三个文本框,其名称分别为’Textl、Text2和Text3,文本框内容分别设置为“等级考试”、“计算机”和空白。然后画两个单选按钮,其名称分别为Opl和Op2,标题分别为“交换”和“连接”(如图1-189所示),编写适当的事件程序。程序运行后,如果选中“交换”单选按钮并单击窗体,则Textl文本框中内容与Text2文本框中的内容进行交换,并在Text3文本框中显示“交换成功”;如果选中“连接”单选按钮并单击窗体,则把Textl和Text7.的内容按Textl在前、Text2在后的顺序连接起来,并在Text3文本框中显示连接后的内容。存盘时,工程文件名为sjt4.vbp,窗体文件名为sjt4.frm。
注意:不得修改已经给出的程序。在结束程序运行之前,必须选中一个单选按钮,并单击窗体。退出程序时必须通过单击窗体右上角的关闭按钮,否则无成绩。

选项

答案第1小题 【操作步骤】 步骤1:打开考生文件夹下的本题工程文件sjt3.vbp。 步骤2:在窗体。Forml中加入两个框架和一个标签以及一个命令按钮,然后在每个框架中各加入两个单选按钮,分别设置他们的相关属性,其属性及值如表2-107所示。 [*] 步骤3:打开代码编辑窗口输入如下代码: 参考代码: PriVate Sub C1_Click() If Opl And Op3 Then Labl.Capt.ion="坐飞机去广州" ElseI f Opl.And Op4 Then Labl.Caption="坐飞机去昆明" ElseIf Op2 And Op3 Then Labl.Caption="坐火车去广州" ElseI f Op2 And Op4 Then Labl.Caption="坐火车去昆明" End If End Sub 步骤4:按要求将文件保存至考生文件夹中。 步骤5:按键运行程序,选择一种交通工具和一个到达目标,并单击命令按钮,最后单击窗体右上角的关闭按钮退出程序。 第2小题 【操作步骤】 步骤l:打开考生文件夹下的本题工程文件sjt4.vbp。 步骤2:在窗体Forml中加入三个文本框和两个单选按钮,分别设置它们的相关属性,其属性及值如表2-108所示。 [*] 步骤3:打开代码编辑窗口输入如下代码: 参考代码: Private Sub Form_Click() If ODl Then Text3.Text=Textl.Text Textl.Text;Text2.Text Text2.Text=Text3.Text Text3.Text="交换成功" ElseIf Op2 Then Text3.Text=Textl.Text&Text2.Text End If End Sub 步骤4:按要求将文件保存至考生文件夹中。 步骤5:按键运行程序,选择一个单选按钮,并单击窗体,最后单击窗体右上角的关闭按钮退出程序。

解析 第1小题
   根据题目要求,在“确定”按钮的单击事件过程中,先用If语句判断框架Fl中的Opl是否选中(即以Opl.Value=Tree为条件表达式),如果条件为真,那么再继续判断框架F2中的Op3是否选中(即以Op3.Value=Tme为条件表达式),当Op3被选中时,标签中显示“坐飞机去广州”,否则显示“坐飞机去昆明”;同理在外层If语句条件为假(即Op2被选中)时,也作类似处理。这样一共就有四种可能:Opl和0p3被选中、Opl和Op4被选中、Op2和Op3被选中、0p2和0p4被选中,对于可能出现的不同选择对照题目中表的规定,在标签中显示不同内容。以上判断和显示操作均在C1的Click事件中完成。
第2小题
  根据题目要求,设计本题程序的思路:在窗体Forml的Click事件过程中分别以Opl和Op2是否选中作为If语句的条件,当Opl被选中时,将两个文本框中的内容通过一个中间变量进行交换;当Op2被选中时,将两个文本框中的内容连接起来。
转载请注明原文地址:https://kaotiyun.com/show/vUmp777K
0

最新回复(0)