第11章 多窗体与多文档界面.pptVIP

第11章 多窗体与多文档界面 沈阳理工大学应用技术学院 * 0. 本章内容 多窗体处理 VB工程结构 闲置循环与DoEvents语句 MDI窗体 MDI应用 * * 1. 多窗体处理 与多窗体有关的语句和方法 Load语句：把一个窗体装入内存 格式：Load 窗体名称 Unload语句：清除内存中指定的窗体 格式：Unload 窗体名称 Show方法：用来显示一个窗体 格式：［窗体名称.］Show ［模式］ Hide方法：隐藏窗体不显示，但仍在内存中 格式：[窗体名称.]Hide * * 1. 多窗体处理 * 【例1】多窗体应用示例。 1.创建3个窗体和1个标准模块 (1)主窗体(Form1) 本窗体上建立了“输入参数”(Command11)、“画圆”(Command12)和“结束”(Command13)三个命令按钮 设置为启动窗体 * 1. 多窗体处理 * (2)“输入参数”窗体(Form2) 在主窗体上单击了“输入参数”按钮后弹出的窗体，用于输入圆的坐标位置(x,y)和半径(r)。窗体上建立了3个文本框(Text21、Text22和Text23)和1个“返回”命令按钮(Command21) * 1. 多窗体处理 * (3)“画圆”窗体(Form3) 在主窗体上单击了“画圆”按钮后弹出的窗体。窗体上建立了1个图片框和2个命令按钮。用户可以单击“画圆”(Command31)命令按钮，使之按给定参数在图片框上画圆。 * 1. 多窗体处理 * (4)标准模块(Modulel) 由于在各窗体之间需要使用公共变量来传送数据，所以建立一个标准模块Modulel，对用到的全局变量X、Y和R进行声明 * 1. 多窗体处理 * Private Sub Command11_Click() 主窗体“输入参数”按钮 Form1.Hide 隐藏主窗体 Form2.Show 显示“输入参数”窗体 End Sub Private Sub Command12_Click() 主窗体“画圆”按钮 Form1.Hide 隐藏主窗体 Form3.Show 显示“画圆”窗体 End Sub Private Sub Command13_Click() 主窗体“结束”按钮 Unload Form1 Unload Form2 Unload Form3 End End Sub 2.编写程序代码 主窗体： * 1. 多窗体处理 * 输入参数： Private Sub Command21_Click() “输入参数”窗体的“返回”按钮 X = Val(Text21.Text) Y = Val(Text22.Text) r = Val(Text23.Text) Form2.Hide 隐藏“输入参数”窗体 Form1.Show 显示主窗体 End Sub 画圆： Private Sub Command31_Click() “画圆”窗体的“画圆”按钮 Picture1.Cls Picture1.Circle (X, Y), r End Sub Private Sub Command32_Click() “画圆”窗体的“返回”按钮 Form3.Hide 隐藏“画圆”窗体 Form1.Show 显示主窗体 End Sub * 1. 多窗体处理 启动窗体的设置 通过“工程”菜单的“工程属性”指定 多窗体程序的存取 * * 2. VB工程结构 应用程序通常包括3种模块 * 应用程序 工程文件 (.vbp) 窗体模块 文件(.frm) Sub 过程 Function 过程 事件 过程 声明 部分 类模块 文件(.cls) 标准模块 文件(.bas) Sub 过程 Function 过程 声明 部分 Sub Main 过程 * 2. VB工程结构 Sub Main过程 程序一般从启动窗体的Form_Load过程开始执行 应用程序在运行时会先执行Sub Main过程 有时在程序启动时不加载任何窗体，而是首先执行一段程序代码，此时可把要执行的程序代码放在Sub Main过程中，并指定Sub Main为“启动对象”。 在一个工程中只能有一个Sub Main过程 设置Sub Main过程为“启动对象”的方法： 在“工程属性”对话框的“通用”选项卡中，从“启动对象”下拉列表框中选中“Sub Main” * *