VB课件含具体例子第11章Windows风格的界面设计幻灯片.pptVIP

11.2.3 弹出菜单 一般来说，菜单都在窗口的顶部，但Visual Basic也支持弹出菜单。弹出菜单是独立于窗体菜单栏而显示在窗体内的浮动菜单。弹出菜单在窗体内的显示位置取决于单击鼠标键时指针的 位置。 设计弹出菜单与设计一般的菜单类似，如果不希望菜单出现在窗口的顶部，只需将菜单名的Visible属性设置为False，即在菜单编辑器内不选中可见复选框。Visual Basic提供了PopupMenu方法来显示弹出菜单。当使用PopupMenu方法时，它忽略Visible的设置。该方法的使用形式是： [Object.]PopupMenu menuname[flags[,x[, y[,boldcommand]]]] Boldcommand是可选的。指定弹出式菜单中的菜单控件的名字，用以显示其黑体正文标题。如果该参数省略，则弹出式菜单中没有以黑体字出现的控件。 可以选择位置值和性能值，将其用“或”运算符组合。结合MouseDown或MouseUp事件过程使用PopupMenu方法。 其中：菜单名是必需的，其他参数是可选的。x、y参数指定弹出菜单显示的位置。flags参数用于进一步定义弹出菜单的位置和性能，它可采用表11-3中的数值。 说明： 11.2.3 弹出菜单 表11-3 用于描述弹出菜单位置 分 类 常 数 值 说 明 位置 VbPopupMenuLeftAlign 0 X位置确定弹出菜单的左边界（默认） VbPopupMenuCenterAlign 4 弹出菜单以X为中心 VbPopupMenuRightAlign 8 X位置确定弹出菜单的右边界 性能 VbPopupMenuLeftButton 0 只能用鼠标左键触发弹出菜单（默认） VbPopupMenuRightButton 2 能用鼠标左键和右键触发弹出菜单 ? 11.2.3 弹出菜单 例如，在[例11-4]中要加入有关“编辑”这部分菜单的弹出菜单功能，用鼠标右键单击Text1时能弹出EditMenu菜单中的菜单项，并以鼠标指针坐标X为弹出菜单的中心，可使用如下代码： Private Sub Text1_MouseDown(Button As Integer,Shift As Integer,X As Single，Y As Single) If Button=2 Then PopupMenu EditMenu,VbPopupMenuCenterAlign End Sub 这里，Button=2表示按下鼠标右键，EditMenu为编辑菜单名，VbPopupMenuCenterAlign指定弹出菜单的位置(可以使用数值H4)。如果要在各个控件对象上都能弹出EditMenu菜单，就需要在各个控件对象的MouseDown事件过程使用PopupMenu方法。 11.3 多重窗体和多文档界面 本节由以下几部分内容组成： 11.3.1 多重窗体的操作 11.3.2 多文档界面 对多重窗体是指一个应用程序中有多个并列的普通窗体，每个窗体可以有自己的界面和程序代码，完成不同的功能，如例11-7。多文档界面是指一个应用程序(父窗体)中包含多个文档(子窗体)，绝大多数基于Windows的大型应用程序都是多文档界面，如Microsoft Access和Microsoft Word等。多文档界面可同时打开多个文档，它简化了文档之间的信息交换。 11.3.1 多重窗体的操作 当一个程序中需要多个界面时，如输入数据窗体、显示统计结果窗体及某些对话框等，则需要用到多个并列窗体，称为多重窗体。 1．添加窗体 用户可以通过“工程”菜单上的“添加窗体”命令或工具条上的添加窗体按钮来打开“添加窗体”对话框，选择“新建”选项卡新建一个窗体；选择“现存”选项卡把一个属于其他工程的窗体添加到当前工程中，这是因为每一个窗体都是以独立的FRM文件保存的。 但当添加一个已有的窗体到当前工程时，有两个问题要注意： （1）该工程内的每个窗体的Name属性不能相同，否则不能将现存的窗体添加进来； （2）在该工程内添加进来的现存窗体实际上在多个工程中共享，因此，对该窗体所做的改变，会影响到共享该窗体的所有工程。 在拥有多个窗体的程序中，要有一个开始窗体。系统默认窗体名为Form1的窗体为开始窗体，如要指定其他窗体为开始窗体，应使用“工程”菜单中“属性”命令来设置。 11.3.1 多重窗体的操作 2．设置启动对象 一个应用程序若具有多个窗体，它们多是并列关系。在程序运行过程中，首先执行的对象被称为启动对象。默认情况下，第一个创建的窗体被指定为启动对象，