对于较为简单的应用程序,一个窗体就足够了。对于复杂的.ppt

* * 对于较为简单的应用程序，一个窗体就足够了。对于复杂的应用程序，往往需要通过多重窗体（MultiForm）来实现。每一个窗体可以有不同的界面和程序代码，以完成不同的功能。如有的窗体用来输入数据，有的窗体用来显示结果等等。 多文档界面（MDI，multiple document interface）是一种典型的Windows应用程序结构。多文档界面由一个父窗体（简称MDI窗体）和一个或多个子窗体组成，MDI窗体作为子窗体的容器，子窗体包含在父窗体之内，用来显示各自的文档，所有的子窗体都具有相同的功能。 第10章 多重窗体与环境应用 1.添加窗体 单击“工程 | 添加窗体”命令或单击工具条上的“添加窗体”按钮 ，打开“添加窗体”对话框，单击“新建”选项卡，从列表框中选择一种新窗体的类型；或者单击“现存”选项卡，将属于其他工程的窗体添加到当前过程中。 2.与多重窗体程序设计有关的语句和方法 多重窗体的操作需要在各个窗体之间进行切换，涉及到窗体的“建立”、“装入”、“显示”、“隐藏”、“删除”等操作。 （1）Load语句 Load语句的作用是将一个窗体装入内存，但并不显示窗体，其语法格式为： Load 窗体名称 （2）Unload语句 Unload语句的功能与Load语句相反，是将窗体从内存中删除。Unload语句的语法格式为： Unload 窗体名称 10. 1 建立多重窗体应用程序 （3）Show方法 Show方法的语法格式为： [窗体名称.]Show [模式] （4）Hide方法 用以隐藏窗体对象，但不能使其卸载。Hide方法的语法格式为： [窗体名称.]Hide 隐藏窗体时，它就从屏幕上被删除，并将其 Visible 属性设置为 False。 用户将无法访问隐藏窗体上的控件，但是对于运行中的 Visual Basic 应用程序，或对于通过 DDE 与该应用程序通讯的进程及对于 Timer 控件的事件，隐藏窗体的控件仍然是可用的。 窗体被隐藏时，用户只有等到被隐藏窗体的事件过程的全部代码执行完后才能够与该应用程序交互。 如果调用 Hide 方法时窗体还没有加载，那么 Hide 方法将加载该窗体但不显示它。 3.不同窗体之间的数据交换 可以在多重窗体之间存取控件或全局变量的值。 4.设置启动对象 在具有多个窗体的应用程序中，各个窗体之间是并列关系。程序运行时，首先执行的对象模认为第一个创建的窗口Form1，称为启动对象。根据需要可以指定其他窗体或Main子过程为启动对象。 指定启动对象 5. 闲置循环与DoEvents语句 VB语言属于事件驱动型语言，即只有当发生某种事件时，才执行相应的程序，否则，应用程序会处于“闲置”状态。而一旦响应某个事件时，只有在该事件执行完毕后才能响应另外的事件为了改变这种执行顺序，VB提供了闲置循环（idle loop）和DoEvents语句。 DoEvents既可以作为语句使用，也可以作为函数使用，其一般格式为： [窗体号 | 变量名]=DoEvents[()] DoEvents函数 DoEvents DoEvents语句 下面结合实例介绍多文档界面应用程序的特点。 在菜单设计一节创建了一个“电脑销售系统”的范例，在该例的基础上建立多文档界面。用户每次单击“用户”菜单下的“新建”命令，将显示一个新的Form1类的窗口，该窗口中的文本框显示用户配置情况。用户单击“部件”菜单下的不同的命令，将打开不同的对话框，供用户选择不同的配件，用户的选择将显示在文本框中。 多文档界面 三种形式的窗体 10. 2 多文档界面 1.建立多文档界面的基本步骤 （1）创建和设计MDI父窗体 （2）创建和设计MDI子窗体 如下面的newclient子过程运行时创建Form1窗体。 Public Sub newclient() Dim newform1 As New Form1, name As String 在这里添加将自定义记录类型变量Clientnumber 清零，该变量保存客户资料 Form1.Hide name = InputBox(请输入姓名, 客户名称) If name Then MDIForm1.Picture1.Visible = False newform1.Show clientnumber.clientname = name MDIForm1.ActiveForm.Text1.Text = name + vbCrLf End If End Sub （3）MDI子窗体的特性 在设计阶段，子窗体独立于父窗体，与普通