VB多窗体综合应用
- 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。
题目:多重窗体应用示例。输入学生5门课程的成绩,计算总分及平均分并显示。
本例有三个窗体form1、form2和form3,分别作为本应用程序的主窗体、输入窗体和输出窗体。还有一个标准模块module1,对窗体间共用的全局变量进行了说明。
Form1窗体:如下图所示,这是主窗体,运行后看到的第一个窗体。单击“输入成绩”按钮显示form2,单击“计算成绩”按钮显示form3.
Form2窗体:如下图所示,这是在主窗体上单击“输入成绩”按钮后弹出的窗体。改窗体上有5个用于输入学生成绩的文本框和一个“返回”按钮。
Form3窗体:如下图所示,这是在主窗体上单击“计算成绩”按钮后弹出的窗体。该窗体上有两个用于显示学生平均成绩和总分的文本框和一个“返回”按钮。
具体步骤:
1.在标准模块存放多窗体间共用的全局变量声明:
Public sMath As Single, sPhysics As Single, sChemistry As Single, sChinese As Single, sEnglish As Single
2.在form1窗体中添加三个命令按钮,输入以下代码:
Sub Command1_Click()
Form1.Hide
Form2.Show
End Sub
Sub Command2_Click()
Form1.Hide
Form3.Show
End Sub
Private Sub Command3_Click()
End
End Sub
3.在form2窗体中添加五个标签控件、5个文本框控件和1个命令按钮,编写如下代码:
4.在form4中添加2个标签控件、一个命令按钮和两个文本框控件,编写如下代码:
注:本实验的关键在于
①需在标准模块中存放多窗体间共用的全局变量;
②需很清楚窗体间命令启动时要跳跃到的窗体。