多重窗体与多重文档界面

1、多重窗体与多重文档界面第1页，共16页，2022年，5月20日，14点20分，星期二菜单列表框一、菜单编辑器的使用 工具菜单编辑器(CTRL+E)窗体上快显菜单菜单编辑器菜单项属性常用属性：1. 标题(Caption) 热键：前面加&2. 名称(Name)文本框 分隔符也应有名称。3. 快捷键(Shortcut) 菜单名没有快捷键4. 复选(Checked)检查框 TRUE 有5. 有效(Enabled)检查框6. 可见(Visible)检查框 操作按钮第2页，共16页，2022年，5月20日，14点20分，星期二二、 菜单项增减在程序运行时，菜单随时增减，如“文件”菜单能保留最近打开的文件数

2、。这同控件数组一样，使用菜单数组。步骤： 1.在菜单设计时，加入一个菜单项，其Index为0（菜单数组）, Visual为False。 2.在程序运行时，通过Load方法向菜单数组增加新的菜单项。 同样，要删除所建立的菜单项，使用UnLoad方法向菜单数组减少菜单项。第3页，共16页，2022年，5月20日，14点20分，星期二三、 弹出菜单(快捷菜单) 显示在窗体的浮动菜单，操作时使用右键，菜单与鼠标位置有关。设计与普通菜单，仅该菜单名不可显示；要显示时使用PopupMenu方法弹出菜单。 形式： 对象.PopupMenu 菜单名, 标志, x, y 标志，表示弹出的位置和触发的键 位置性能

3、0：X 位置确定弹出菜单的左边界0只能用鼠标左键触发弹出菜单；4：弹出菜单以X为中心2：能用鼠标左、右键键触发弹出菜单；8： X 位置确定弹出菜单的右边界 位置与性能是加的关系。Sub Text1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) If Button = 2 Then PopupMenu EditMenu, vbPopupMenuCenterAlignEnd Sub第4页，共16页，2022年，5月20日，14点20分，星期二9.2 多重窗体 应用程序根据所解决问题的不同，需要建立多

4、个窗体作为信息载体。 Windows环境的应用程序至少需要一个窗体。 多窗体可以是并列的，并有且仅有一个窗体是启动窗体。 多窗体也可以是层次结构的，即一个MDI窗体（父窗体）和多个子窗体。第5页，共16页，2022年，5月20日，14点20分，星期二1. 添加窗体 “工程或工具栏|添加窗体”新建 现存 添加“现存”窗体时要注意： 防止多个窗体的Name相同而不能添加； 添加的窗体实际是将其他工程中已有的窗体加入，多个工程共享窗体； 通过“另存为”命令以不同的窗体文件名保存，断开共享。 2. 保存窗体 一个工程中有多个窗体，应分别取不同文件名保存在磁盘上，VBP工程文件中记录了该工程的所有窗体文

5、件名。 第6页，共16页，2022年，5月20日，14点20分，星期二3. 设置启动窗体设置启动对象5. 窗体方法 (1)Load语句：装入窗体到内存但没有显示窗体 形式： Load 窗体名称(2)Unload语句：从内存删除窗体 形式： Unload 窗体名称“工程/属性” “启动对象”4. 删除窗体先在工程资源管理器窗口中选定要删除窗体,然后通过工程菜单的“移除窗体”命令或右击工程管理窗口的窗体名,在快捷菜单中选取“移除窗体”第7页，共16页，2022年，5月20日，14点20分，星期二 (3)Show方法：显示一个窗体（当窗体没有Load，自动Load） 窗体名称.Show 模式 0 无

6、模式：可以对其他窗体进行操作，1 有模式：关闭才能对其他窗体进行操作。 (4) Hide方法：隐藏窗体，没有Unload-删除 窗体名称. Hide 6. 不同窗体间数据的存取 (1)存取控件的属性 另一窗体名.控件名.属性 (2)存取变量的值 另一窗体名.全局变量名第8页，共16页，2022年，5月20日，14点20分，星期二例 输入和计算学习成绩。模块：Public MATH As SinglePublic PHYSICS As SinglePublic CHEMISTRY As SinglePublic CHINESE As SinglePublic ENGLISH As Single第

7、9页，共16页，2022年，5月20日，14点20分，星期二模块是程序中相结独立的程序单元,VB中主要有三种不同的模块：标准模块、窗体模块和类模块。一、标准模块 1、组成和作用 由全局变量声明、模块变量声明和通用过程等组成，用于定义全局或模块级的变量或过程。 2、建立标准模块 执行菜单： 工程 添加模块 二、窗体模块 1、组成和作用 由一个或多个窗体组成，实现界面设计，完成变量或常量的声明、通用或事件驱动子过程的定义。9.3 模块第10页，共16页，2022年，5月20日，14点20分，星期二 2、建立窗体 执行菜单： 工程 添加窗体 3、调用窗体过程 窗体名.过程名（参数列表）三、Sub M

8、ain过程 一般程序的运行是从某指定的窗体文件开始执行的，但有时需要在窗体被显示前，先完成一些初始化工作，为完成这一工作可在显示窗体之前应先执行没有主界面的“Sub Main()”过程，这就需要设计这样一个“通过子过程”，并通过菜单：工程工程属性，打开工程属性对话框，并将“Sub Main()”过程设为“启动对象”即可。第11页，共16页，2022年，5月20日，14点20分，星期二9.3 多重文档界面 多文档界面设计是由一个MDI窗体和至少一个子窗体组成的。其特点是：1. MDI窗体只能有且仅有一个。2. 子窗体至少一个。3. 用户可以改变并移动子窗体的大小，但被限制在MDI窗体内。4. 子

9、窗体最小化后显示在MDI窗体左下角5. MDI 窗体最小化时，在任务栏显示，所有子窗体相应最小化，但不在任务栏显示。6. 还原MDI窗体时其子窗体同时按最小化前的状态显示。7. 通过子窗体的AutoShowChildren属性，在程序加载时自动显示或隐藏该窗体8. MDI和子窗体可各有自己的菜单，但当子窗体的加载时覆盖MDI窗体的菜单。第12页，共16页，2022年，5月20日，14点20分，星期二多文档界面(MDI)1. 创建和设计MDI窗体及其子窗体 (1) 创建和设计MDI窗体 创建： “工程/添加MDI窗体”命令设计：一般有菜单栏、工具栏、状态栏第13页，共16页，2022年，5月20

10、日，14点20分，星期二(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第14页，共16页，2022年，5月20日，14点20分，星期二2. MDI窗体与子窗体的交互 (1)活动子窗体和活动控件 MDI窗体的两个属性：ActiveForm 和ActiveControl 例将子窗体的文本框中所选文本复制到剪贴板上： (2)显示MDI窗体及其子窗体 显示任何窗体的方法为show,还有有关规则： （1）加载子窗体时，其父窗体会自动加载并显示；反之则无。 （2）MDI窗体有AutoShowChildren属性，决定是否自动显示子窗体 第15页，共16页，2022年，5月20日，14点20分，星期二3. 多文档界面应用程序中的“窗口