VB教案(PPT)PPT.ppt

8.3 多重窗体和多文档窗体 一、多重窗体 1.添加窗体 “工程|添加窗体” 新建 现存 添加“现存”窗体时要注意： 防止多个窗体的Name相同而不能添加； 添加的窗体实际是将其它工程中已有的窗体加入，多个工程共享窗体； 通过“另存为”命令以不同的窗体文件名保存，断开共享。 2. 保存窗体 一个工程中有多个窗体，应分别取不同文件名保存在磁盘上，VBP工程文件中记录了该工程的所有窗体文件名。 3. 设置启动窗体 设置启动对象 4. 窗体语句 (1)Load语句：装入窗体到内存但没有显示窗体 形式： Load 窗体名称 (2)Unload语句：从内存删除窗体 形式： Unload 窗体名称 “工程/属性” “启动对象” 5. 窗体方法 (1)Show方法：显示一个窗体（当窗体没有Load，自动Load） [窗体名称].Show [模式] 0 － Modal：关闭才能对其它窗体进行操作。 1 － Modeless，可以对其它窗体进行操作。 (2) Hide方法：隐藏窗体，没有Unload删除 [窗体名称.] Hide 6.不同窗体间数据的存取 (1)存取控件的属性 另一窗体名.控件名.属性 (2)存取变量的值 另一窗体名.全局变量名 例8.8 输入和计算学习成绩。 模块： Public MATH As Single Public PHYSICS As Single Public CHEMISTRY As Single Public CHINESE As Single Public ENGLISH As Single 二、 多文档界面(MDI) 例8.9 1. 创建和设计MDI窗体及其子窗体 (1) 创建和设计MDI窗体 创建： “工程/添加MDI窗体”命令 设计：一般有菜单栏、工具栏、状态栏 (2) 创建和设计MDI子窗体 创建： MDI子窗体是一个MDIChild属性为True的普通窗体。 要创建多个子窗体，通过窗体类来实现： Public Sub FileNewProc() Dim NewDoc As New frmMDIChild No = No + 1 NewDoc.Caption = no No NewDoc.Show End Sub 设计：可有菜单栏，但必须有文本框。 MDI子窗体的Name 2. MDI窗体与子窗体的交互 (1)活动子窗体和活动控件 MDI窗体的两个属性：ActiveForm 和ActiveControl 例将子窗体的文本框中所选文本复制到剪贴板上： ClipBoard.SetText frmMDI.ActiveForm.ActiveControl.SelText (2)显示MDI窗体及其子窗体 显示任何窗体的方法为show,还有有关规则： 加载子窗体时，其父窗体会自动加载并显示；反之则无。 MDI窗体有AutoShowChildren属性，决定是否自动显示子窗体 (3)维护子窗体的状态信息 (4)用QueryUnload卸载MDI窗体 3. 多文档界面应用程序中的“窗口”菜单 (1)显示打开的多个文档窗口 要在某个菜单上显示所有打开的子窗体标题，只需利用菜单编辑器将该菜单的WindowList属性设置为True。 (2)排列窗口 利用Arrange方法进行层叠、平铺和排列图标。 形式： MDI窗体对象.Arrange 排列方式 排列方式 8.4工具栏和状态栏 “Microsoft Windows Common Controls 6.0”将控件添加到工具箱， 通过ToolBar、ImageList组合使用建立工具栏，步骤： 1.在ImageList控件中添加所需的图象 2.在ToolBar控件中创建Button对象。 3.在ButtonClick事件中用Select Case语句对各按钮进行相应的编程。 一、在ImageList控件中添加图象 ImageList控件不单独使用，专门为其它控件提供图像库. 索引（Index）、 关键字（Key） 在ToolBar中引用 图象文件的扩展名