当前位置:IT认证>BASIC题库

问题:[问答题]

[问答题] 在考生文件夹下完成如下简单应用。 1.有一个ylc5.vbp,只有一个窗体Form1,需要创建Form2。在窗体Form1上建立Command1和Command2两个命令按钮,标题分别为“隐藏启动窗体”和“关闭窗体”。在窗体Form2上创建标题为“打开窗体1”的按钮。将Form2设为启动窗体,单击Form2上的按钮,则显示Form1窗体:若单击Form1上的“隐藏启动窗体”按钮,则Form2消失。若单击Form1上的“关闭窗体”按钮,则Form1和Form2都消失,退出程序。 注意:存盘

  

参考答案:

操作步骤
(1)在VisualBasic集成环境选择“文件”→“打开工程”命令,在对话框中选择ylc6.Vbp工程文件,单击“确定”按钮。
(2)在工具箱中选择命令按钮,用鼠标在窗体Form1上拖动,创建两个命令按钮。在属性窗口分别设置它们的名称(Name属性)为Command1和Command2,标题(Caption属性)为“隐藏启动窗体”、“关闭窗体”。
(3)在菜单栏选择“工程”→“添加窗体”命令,弹出对话框如图33所示。单击“打开”按钮,在工程框中生成Form2的窗体。
[*]
(4)选择命令按钮,在上面Form2窗体创建一个命令按钮,设置名称为Command1,标题为“打开窗体1”。
(5)为设置Form2启动窗体做如下的操作:
1)从“工程”菜单中选择“工程属性”命令,弹出如图34所示的界面。
[*]
2)选择“通用”属性页,在“启动对象”中选择Form2,单击“确定”按钮,设置该窗体为启动窗体。
2.行为编码
(1)用鼠标单击窗体Form1,出现Form1的代码窗口。选择Command1按钮的Click事件,代码如下:
PrivateSubCommand1_Click()
Form2.Hide
EndSub
(2)在Form1的代码窗口内选择Command2按钮的Click事件,代码如下:
PrivateSubCommand2_Click()
’卸载窗体2
UnloadForm2
’卸载自身也即窗体1
UnloadMe
EndSub
(3)用鼠标单击窗体Form2,出现Form2的代码窗口。选择Command1按钮的Click事件,代码如下;
PrivateSubCommand3_Click()
Form1.Show
EndSub
3.存盘保存
执行“文件”→“保存工程”命令,工程文件名为ylc5.vbp,窗体文件名为ylc5-1.frm,ylc5-2.frm。

  参考解析

(1)本题考查多窗体的应用创建、不同窗体上的命令按钮事件、控制两个窗体的显示、应用程序的结束控制以及如何在工程窗口中设置启动窗口。(2)注意Form对象的Show方法,End应用结束控制。(3)通过调用Form2的Hide方法隐藏Form2窗体,通过Unload方法关闭窗体1和窗体2,通过调用Form1的Show方法显示Form1窗体。

微信端