vb 菜单与对话框.ppt

第9章 菜单与对话框 第9章 菜单与对话框 9.1 使用菜单 菜单是Windows应用程序中十分关键的要素之一，它以分组的形式组织多个命令或操作，为用户灵活操作应用程序提供了便捷的手段。 在实际的应用中，菜单可分为两种基本类型：下拉式菜单和弹出式菜单。下拉式菜单一般通过单击菜单栏中菜单标题（如“文件”、“编辑”、“视图”等）的方式打开，弹出式菜单则通过用鼠标右键单击某一区域的方式打开。 9.1.1 下拉式菜单 在下拉式菜单系统中，一般有一个主菜单，称为菜单栏。其中包括一个或多个选择项，称为菜单标题。当单击一个菜单标题时，包含菜单项的列表（菜单）即被打开。菜单由若干个命令、分隔条、子菜单标题（其右边含有三角的菜单项）等菜单项组成。当选择子菜单标题时又会“下拉”出下一级菜单项列表，称为子菜单。VB的菜单系统最多可达6层。 1. 菜单控件 在VB中，菜单也是一个图形对象，即控件。与其它控件一样，它具有定义其外观与行为的属性。在设计或运行时可以设置Caption属性、Enabled和Visible属性、Checked属性以及其它属性。菜单控件只包含一个事件，即Click事件，当用鼠标或键盘选中该菜单控件时，将调用该事件。与一般控件不同的是，菜单控件不在VB的工具箱中，需要在VB的“菜单编辑器”中进行菜单的设计。 2. 菜单编辑器 用菜单编辑器可以创建新的菜单和菜单项、在已有的菜单上增加新命令、编辑已有的菜单命令、以及修改和删除已有的菜单和菜单项。 在VB系统的“工具”菜单中选择“菜单编辑器”，或在“工具栏”上单击“菜单编辑器”按钮都可以打开菜单编辑器，如图9-2所示。 图9-2 菜单编辑器 菜单编辑器分为三个部分： 1) 菜单控件属性区。用于设置菜单项的各个属性，表9-1列出其中的主要属性： 表9-1 菜单控件的主要属性 其他属性可参见VB的联机帮助。 2) 编辑区。编辑区共有7个按钮，用来对输入的菜单项进行简单的编辑。 3) 菜单控件列表框。菜单控件列表框位于菜单编辑器的下部，输入的菜单项在这里显示出来，并通过内缩符号表明菜单项的层次，如图9-3所示。 图9-3 菜单控件列表框与对应的菜单项 3. 下拉式菜单的设计 下面通过一个例子来说明菜单程序设计的基本方法和步骤，这个方法具有通用性，无论多复杂的菜单都可以通过这个方法设计出来。 【例9-1】为例4-13中的电子标题板增加一个菜单，利用菜单来控制标题板的内容、字体、字体风格等，如图9-4所示。 图9-4 利用菜单控制标题板 只需在例4-13的基础上作如下修改： ① 打开菜单编辑器，按照表9-3设计菜单项： 表9-3 菜单项的设置 ② 编写菜单项代码。 编写“文本内容”项Txt的Click事件代码： Private Sub Txt_Click() temp = InputBox(请输入标题板的新内容, 输入, Label1.Caption) If temp Then Label1.Caption = temp End If End Sub 编写“文本字体”中4个菜单选项的Click事件代码： Private Sub song_Click() Label1.FontName = 宋体 End Sub Private Sub li_Click() Label1.FontName = 隶书 End Sub Private Sub kai_Click() Label1.FontName = 楷体_GB2312 End Sub Private Sub hei_Click() Label1.FontName = 黑体 End Sub 编写“文本风格”中3个菜单选项的Click事件代码： Private Sub bld_Click() bld.Checked = Not bld.Checked Label1.FontBold = bld.Checked End Sub Private Sub Itl_Click() Itl.Checked = Not Itl.Checked Label1.FontItalic = Itl.Checked End Sub Private Sub Undrln_Click() Undrln.Checked = Not Undrln.Checked Label1.FontUnderline = Undrln.Checked End Sub 4