VisualBasic程序设计项目化训练教程.ppt

项目4 设计制作工资管理系统;本项目训练的目的;任务4.1 熟悉相关知识; MDI窗体可作为应用程序背景的窗口，也是子窗体（MDIChild 属性设置为 True 的窗体）的容器。在工程菜单中选择“添加 MDI 窗体”就可以创建 MDI窗体，一个应用程序只能有一个 MDI窗体，但是可以有多个MDI 子窗体。如果 MDI 子窗体有菜单，那么，当 MDI 子窗体为活动窗体时，子窗体的菜单条自动取代 MDI窗体的菜单条。最小化的 MDI 子窗体以图标形式出现在MDI窗体中。;4.1.1 多文档界面（MDI）设计;4.1.1 多文档界面（MDI）设计;【例 4.1】Arrange方法与QueryUnload事件应用。 ;4.1.2 菜单设计; 菜单控件是一个对象；与其它对象一样，它具有定义它的外观与行为的属性。在设计或运行时可以设置 Caption 属性、Enabled 和 Visible 属性、Checked 属性以及其它属性。 菜单控件只包含一个事件，即 Click 事件，当用鼠标或键盘选中该菜单控件时，将调用该事件。 ; 2．菜单编辑器对话框选项 标题：使用该选项可以输入菜单名或命令名，这些名字出现在菜单条或菜单之中。如果想在菜单中建立分割条，则应在Caption 框中键入一个连字符 (-)。为了能够通过键盘访问菜单项，可在一个字母前插入 符号。在运行时，该字母带有下划线（ 符号是不可见的），按 ALT 键和该字母就可访问菜单或命令。如果要在菜单中显示 符号，则应在标题中连续输入两个 符号。有些菜单单击;菜单项显示一个对话框，即要求用户提供应用程序执行动作所需信息的窗口。应该在这些菜单项后面加上省略符 (...)。例如，当从“文件”菜单中选择“另存为”时，出现“文件另存为”对话框。 名称：允许为菜单项输入控件名。控件名是标识符，仅用于访问代码中的菜单项。 索引：可指定一个数字值来确定控件在控件数组中的位置。 快捷键：允许为每个命令选定快捷键。;帮助上下文 ID：允许为 context ID 指定唯一数值。在 HelpFile 属性指定的帮助文件中用该数值查找适当的帮助主题。 协调位置：允许选择菜单的 NegotiatePosition 属性。该属性决定是否及如何在容器窗体中显示菜单。 复选：允许在菜单项的左边设置复选标记。通常用它来指出切换选项的开关状态。 有效：决定是否让菜单项对事件做出响应。; 可视：将菜单项显示在菜单上。 显示窗口列表：在 MDI 应用程序中，确定菜单控件是否包含一个打开的MDI子窗体列表。 箭头：调整菜单项的位置。 插入：在当前选定行上方插入一行。 删除：删除当前选定行。 确定：关闭菜单编辑器，并对选定的最后一个窗体进行修改。; 3．弹出式菜单 任何至少有一个菜单项的菜单，运行时都可以显示为弹出式菜单。弹出式菜单一般用鼠标右键激活。使用 PopupMenu 方法可显示弹出式菜单，直到菜单中被选取一项或者取消这个菜单时，调用 PopupMenu 方法后面的代码才会运行。 格式：[object.]PopupMenu menuname [, flags [,x [, y [, boldcommand ]]]] 说明：Flags 参数可以进一步定义弹出式菜单的位置与性能。; 【例 4.2】弹出式菜单示例。 使用 MouseUp 事件判断用户是否在窗体上单击了鼠标右键，若是则弹出菜单。 Private Sub Form_MouseUp (Button As Integer, Shift As Integer, X As Single, Y As Single) If Button = 2 Then 是否单击了鼠标右键。 PopupMenu mnuname 弹出名为mnuname的菜单。 End If End Sub; 4．MDI 应用程序中的菜单 在 MDI 应用程序中，每一个子窗体的菜单都显示在 MDI 窗体上，而不是在子窗体本身。当子窗体有焦点时，该子窗体的菜单（如果有的话）就代替菜单栏上的 MDI 窗体的菜单。如果没有可见的子窗体，或者如果带有焦点的子窗体没有菜单，则显示 MDI 窗体的菜单。 5．创建菜单控件数组 菜单控件数组就是具有相同名称不同下标的;菜单项目的集合。使用菜单控件数组可以简化代码也可以在运行时创建新菜单项。 每个菜单控件数组元素都由唯一的索引值来标识，该值在菜单编辑器上“Index 属性框”中指定。当一个控件数组成员识别一个事件时，Visual Basic 将其 Index 属性值作为一个附加的参数传递给事件过程。事件过程必须包含有核对 Index 属性