1. 请根据以下各题的要求设计Visual Basic应用程序(包括界面和代码)。 1.在窗体(名称为Form1)上画两个命令按钮,其名称分别为C1和C2,标题分别为“命令按钮1”和“命令按钮2”,编写适当的事件过程。程序运行后,“命令按钮2”隐藏,此时如

admin2009-03-17  37

问题 1. 请根据以下各题的要求设计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所示。

选项

答案① 启动Visual Basic,在窗体上画两个命令按钮。 ② 按F4键,激活属性窗口,在属性窗口中设置两个命令按钮的属性,见表1。 [*]   ③ 编写两个命令按钮的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的内容进行设置。当窗体加载时激活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

解析
转载请注明原文地址:https://jikaoti.com/ti/odq0FFFM
0

随机试题
最新回复(0)