问题 问答题

请根据以下各题的要求设计Visual Basic应用程序(包括界面和代码)。1.在窗体(名称为Form1)上画两个命令按钮,其名称分别为C1和C2,标题分别为“命令按钮1”和“命令按钮2”,编写适当的事件过程。程序运行后,“命令按钮2”隐藏,此时如果单击“命令按钮1”,则“命令按钮2”出现,“命令按钮1”隐藏;而如果单击“命令按钮2”,则“命令按钮1”出现,“命令按钮2”隐藏。程序的运行情况如图1—1所示。注意;存盘时,工程文件名为sjt1.vbp.窗体文件名为sjt1.frm。2.在Form1的窗体上画一个命令按钮,其名称为C1,标题为“显示”;再画一个文本框,其名称为Text1,编写适当的事件过程。程序运行后,在窗体加载时使文本框不可见,如果双击窗体,则文本框出现;此时如果单击命令按钮,则在文本框中显示“等级考试”。程序运行情况如图1—2所示。

注意:存盘时必须存放有考生文件夹下,工程文件名为sjt2.vbp,窗体文件名为sjt2.frm。程序中不得使用任何变量。

答案

参考答案:

解析:① 启动Visual Basic,在窗体上画两个命令按钮。
② 按F4键,激活属性窗口,在属性窗口中设置两个命令按钮的属性,见表1。

表 1
控件属性设置值
命令按钮1名称
Caption
C1
命令按钮1
命令按钮2名称
Caption
C2
命令按钮2
  ③ 编写两个命令按钮的Click事件过程:
  Private Sub C1_Click()
    C1.Visible=False
    C2.Visible=True
  End Sub

  Private Sub C2_Click()
    C1.Visible=True
    C2.Visible=False
  End Sub
2.① 对象主要属性设置如表2所示。
表 2
对象对象名属性名属性值
窗体Form1CaptionForm1
文本框Text1
命令按钮C1Caption显示
② 分析:按试题要求在窗体上画出一个文本框和一个命令按钮,并分别将它们的属性按表2的内容进行设置。当窗体加载时激活Form_Load,通过文本框Text的Visible属性设置为False,即将Text文本框隐藏掉。当双击窗体时,产生Form_DblClick事件,Text的Visible属性设置为True,即可见。将字符串“等级考试”赋值给文本框 Text1的Text属性时,则在文本框中显示“等级考试”。
③ 编程代码:
Private Sub C1_Click()
Text1.Text="等级考试"
End Sub
Private Sub Form_DblClick()
Text1.Visible=True
End Sub
Private Sub Form_Load()
Text1.Visible=False
End Sub

填空题
多项选择题