2. 计算机
  3. （1）在考生文件夹下有一个工程文件sjt3.vbp，请在窗体上画两个框架，其名称分别为F1和F2，标题分别为“交通工具”和“到达目标”。在F1中画两个单选按钮，名称分别为Op1和Op2，标题分别为“飞机”和“火车”。在F2中画两个单选按钮，名称分别为Op3

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

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

    程序的运行情况如图1－176所示。存盘时，工程文件名为sjt3.vbp，窗体文件名为sjt3.frm。

    注意：考生不得修改窗体文件中已经存在的程序，在结束程序运行之前，必须至少进行上面的一种操作。退出程序时必须通过单击窗体右上角的关闭按钮。
    （2）在考生文件夹下有一个工程文件sjt4.vbp，请在窗体上画三个文本框，其名称分别为Text1、Text2和Text3，文本框内容分别设置为“等级考试”、“计算机”和空白。然后画两个单选按钮，其名称分别为Op1和Op2，标题分别为“交换”和“连接”（如图1－177所示），编写适当的事件程序。程序运行后，如果选中“交换”单选按钮并单击窗体，则Text1文本框中内容与Text2 文本框中的内容进行交换，并在Text3文本框中显示“交换成功”；如果选中“连接”单选按钮并单击窗体，则把Text1和Text2的内容按Text1在前、Text2在后的顺序连接起来，并在Text3文本框中显示连接后的内容。存盘时，工程文件名为sjt4.vbp，窗体文件名为sjt4.frm。

    注意：不得修改已经给出的程序。在结束程序运行之前，必须选中一个单选按钮，并单击窗体。退出程序时必须通过单击窗体右上角的关闭按钮，否则无成绩。
选项
答案第1小题 【操作步骤】 步骤1：打开考生文件夹下的本题工程文件 sjt3.vbp。 步骤2：在窗体Form1中加入两个框架和一个标签以及一个命令按钮，然后在每个框架中各加入两个单选按钮，分别设置他们的相关属性，其属性及值如表2－81所示。 [*] 步骤3：打开代码编辑窗口输入如下代码： 参考代码： Private Sub C1_Click() If Op1 And Op3 Then Lab1.Caption = "坐飞机去广州" ElseIf Op1 And Op4 Then Lab1.Caption = "坐飞机去昆明" ElseIf Op2 And Op3 Then Lab1.Caption = "坐火车去广州" ElseIf Op2 And Op4 Then Lab1.Caption = "坐火车去昆明" End If End Sub 步骤4：按要求将文件保存至考生文件夹中。 步骤5：按＜F5＞键运行程序，选择一种交通工具和一个到达目标，并单击命令按钮，最后单击窗体右上角的关闭按钮退出程序。 第2小题 【操作步骤】 步骤1：打开考生文件夹下的本题工程文件sjt4.vbp。 步骤2：在窗体Form1中加入三个文本框和两个单选按钮，分别设置它们的相关属性，其属性及值如表2－82所示。 [*] 步骤3：打开代码编辑窗口输入如下代码： 参考代码： Private Sub Form_Click() If Op1 Then Text3.Text = Text1.Text Text1.Text = Text2.Text Text2.Text = Text3.Text Text3.Text = "交换成功" ElseIf Op2 Then Text3.Text=Text1.Text& Text2.Text End If End Sub 步骤4：按要求将文件保存至考生文件夹中。 步骤5：按＜F5＞键运行程序，选择一个单选按钮，并单击窗体，最后单击窗体右上角的关闭按钮退出程序。
解析
转载请注明原文地址:https://kaotiyun.com/show/U3Fp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)