件（用HelpFile属性设置）中查找相应的帮助主题 的数值。
（6）协调位置：此下拉列表框用于确定相应的
菜单或菜单项的显示位置。该下拉列表框中有4个选 项，其作用如下： l 0-None——菜单项不显示； l 1-Left——菜单项靠左显示； l 2-Middle——菜单项居中显示； l 3-Right——菜单项靠右显示。
单击一次右箭头可以产生一个内缩符号（4个点 “....”），其作用是使当前菜单项的层次下降一 层；单击一次左箭头，可以删除一个内缩符号， 其作用是使当前菜单项的层次上升一层。
第四章 菜单与工具栏设计
（2）上、下箭头：用来在菜单项显示区内移
动菜单项的位置。把条形光标移动到某个菜单项 上，单击上箭头将使该菜单项上移，单击下箭头 将使该菜单项下移。
第四章 菜单与工具栏设计
图4-2
“菜单编辑器”对话框
第四章 菜单与工具栏设计
“菜单编辑器”窗口分为3部分：数据区、编辑区 和菜单项显示区。现分别介绍各部分的功能。 1．数据区 数据区是菜单控件的属性区，用于输入和修改 菜单项、设置菜单项的属性。由10个部分组成， 各部分的作用如下。
（1）标题：此文本框用于输入所建立菜单
第四章 菜单与工具栏设计
4.1.3 任务三 创建菜单的步骤
【例4-1】设计一个具有输入、输出和显示功能的 菜单，该菜单可以把输入的一串字符显示出来。
分析：根据题意，可以分为两个主菜单项，分别 为“输入信息”和“显示信息”，它们各包括两 个子菜单项。 l “输入信息”包括“输入”和“退出”。
l “显示信息”包括“显示”和“清除”。
第四章 菜单与工具栏设计
Case 2 „保存子菜单 If Form1.Caption="未命名" Or Form1.Caption="" Then CommonDialog1.ShowSave '显示“另存为”对话 框 fname=CommonDialog1.FileName Else fname=Form1.Caption End If If fname<>"" Then Open fname For Output As #1 Print #1,Text1.Text Close #1 End If
第四章 菜单与工具栏设计
建立主菜单项“显示信息”及其两个子菜单 项的操作与上面所述的各步骤类似，不再重复。 设计完成后的窗口如图4-4所示。此时，单击右上 角的“确定”按钮，菜单的建立工作全部结束。 设计完成后，窗体的顶行显示主菜单项，单 击某个主菜单项，即可显示下拉菜单，如图4-5所 示。
第四章 菜单与工具栏设计
第四章 菜单与工具栏设计
4.1.2 任务二 菜单编辑器
Visual Basic中，用菜单编辑器设计菜单和菜 单项，或在已有的菜单上添加新菜单项、编辑 已有的菜单选项以及修改和删除已有的菜单和 菜单项。
进入菜单编辑器的方式有如下几种：
l 选择“工具”→“菜单编辑器”命令； l 单击常用工具栏中的“菜单编辑器”按钮； l 按Ctrl+E组合键； l 在要建立菜单的窗体（此窗体为活动窗体） 上右击，在弹出的快捷菜单中选择 “菜单编辑 器”命令。弹出“菜单编辑器”对话框，如图 4-2所示。
第四章 菜单与工具栏设计
图4-8 建立菜单控件
第四章 菜单与工具栏设计
图4-9 用菜单控件数组建立菜单
第四章 菜单与工具栏设计
（3）编写事件过程代码 菜单建立好以后，还需要为每一个事件过程编 写相应的代码。下面是每一个菜单项的代码。 “文件”菜单的各个菜单项对应的事件代码如下： Private Sub File_Click(Index As Integer) n=Index Select Case n Case 0 '新建 Text1.Text="" Form1.Caption="未命名"
第四章 菜单与工具栏设计
Case 1 „打开子菜单 CommonDialog1.ShowOpen '显示“打开”对话 框 fname=CommonDialog1.FileName If fname<>"" Then Text1.Text="" Open fname For Input As #1 b="" Do Until EOF(1) Line Input #1,nextline b=b & nextline & Chr(13) & Chr(10) Loop Close #1 Text1.Text=b End If
第四章 菜单与工具栏设计
⑨ 单击编辑区的右箭头，菜单显示区中的“输入” 右移，同时其左侧出现一个内缩符号（….），表明 “输入”是“输入信息”的下一级菜单。 ⑩ 单击“快捷键”下拉列表框右端的下拉按钮， 选择【Ctrl+I】作为“输入”菜单项的快捷键，此时， 在该菜单项右侧出现Ctrl+I。 单击编辑区中的“下一个”按钮，菜单项显示区 的条形光标下移，左端自动出现内缩符号“….”。 在“标题”文本框内输入“退出”，然后在“名称” 文本框内输入“Quit”作为菜单项的名称。 单击“快捷键”下拉列表框右端的下拉按钮，从中 选出【Ctrl+Q】组合键作为“退出”菜单项的快捷键。
（3）索引：此文本框用来为用户建立的控件
数组设立下标，相当于控件数组的Index属性。
（4）快捷键：此下拉列表框用来设置与某菜
单项等价的快捷键。在程序运行时，按下快捷键 会立刻运行一个菜单项。快捷键的赋值包括功能 键与控制键的组合，它们出现在菜单中相应菜单 项的右边。
第四章 菜单与工具栏设计
（5）帮助上下文：此文本框用于输入在帮助文
建立菜单的具体操作步骤如下：
第四章 菜单与工具栏设计
（1）建立控件
本例中需要输入和输出数据，因此需要建立 一个文本框用以输入数据，建立一个标签用以 输出数据，另外建立两个标签作为提示，各控 件的属性设置如表4-1所示，窗体界面如图4-3所 示。此外，还要设置标签output的背景色及 Label1和Label2的显示方式，如图4-4所示。
态（即Enable属性）。默认情况下，该属性为True， 表示该选项为有效，可以对用户事件做出响应。若 设置该选项为False，则相应的菜单项不响应用户 事件。
第四章 菜单与工具栏设计
（9）可见：该复选框用于确定相应的菜单项是
否可见（即Visible属性）。若菜单项是可以执行 的，则其可见属性为True，否则相应的菜单项不能 执行，即其可见属性为False。此时可以把它的 “可见”属性设置为True，那么该菜单项将重新出 现在菜单中。
（10）显示窗口列表：该复选框被选中（即框
内为√）时，将显示当前打开的一系列子窗口。该 选项用于多文档应用程序。
第四章 菜单与工具栏设计
2．编辑区
编辑区有7个按钮，用于对输入的菜单项进行简单 编辑。菜单在数据区输入，在菜单项显示区显示。 这7个按钮的作用如下:
（1）左、右箭头：用来产生和取消内缩符号。
（3）为事件过程编写代码
如前所述，每个菜单项（包括主菜单项和子 菜单项）都可以接收Click事件。每个子菜单项 都对应一个Click事件过程。即程序运行后，只 要单击某个子菜单项，就可以执行事件过程所 定义的操作。 每个菜单项对应一个控件。菜单设计完成 后，窗体上显示出如图4-5所示的菜单项，此 时只要单击某个子菜单项，即可编写该菜单 项的过程。例如，完成菜单设计后，单击 “输入信息”菜单项，显示“输入”和“退 出”子菜单项，如果单击“输入”子菜单项， 则进入程序代码窗口，并显示：
第四章 菜单与工具栏设计
第4章 菜单与工具栏设计
主要内容:
1.菜单设计 2.弹出式菜单设计
3.工具栏设计
4.状态栏设计
第四章 菜单与工具栏设计
4.1 菜 单 设 计
在Windows中，菜单可以分为两种基本类型： 下拉式菜单和弹出式菜单。下拉式菜单一般通过 单击菜单栏中菜单名称的方式打开，而弹出式菜 单一般通过在某一区域右击的方式打开。如图4-1 所示，分别是VB“工程”菜单的下拉式菜单和窗 体的弹出式菜单。
第四章 菜单与工具栏设计
图4-3 菜单控件设计
第四章 菜单与工具栏设计
图4-4 菜单项设计
第四章 菜单与工具栏设计
（2）设计菜单
下面利用菜单编辑器来设计各个菜单项，在 设计菜单控件时应提供3种属性：标题、名称和 内缩符号，一个内缩符号表示一层子菜单，没 有内缩符号表示主菜单项。本例中有两个主菜 单项，每个主菜单项有两个子菜单。其属性设 置如表4-2所示。具体操作步骤如下： ① 选择“工具”→“菜单编辑器”命令， 弹出“菜单编辑器”对话框。 ② 在“标题”文本框中输入“输入信息” （主菜单1），在菜单项显示区中出现同样的 标题名称。
第四章 菜单与工具栏设计
4.1.4 任务四 菜单控件数组
在Visual Basic中，菜单也是图形对象，即 控件，所以可以运用数组的概念。菜单控件数 组的作用主要有以下两方面：
（1）用于动态地增加和删除菜单项；
（2）简化了编程过程，用一段代码处理多 个菜单项。 【例4-2】设计一个简易的文本编辑器，具有新 建、编辑和保存一般文本文件的功能，如图4-7 所示。
第四章 菜单与工具栏设计
（7）复选：此复选框用于设置该菜单项标记
（即菜单项的Checked属性），此选项通常是动态 地加上或取消的，一般应当在程序代码中，ቤተ መጻሕፍቲ ባይዱ据执 行情况设置。当“复选”属性设置为True时，可在 相应的菜单项旁加上标记√，表明该菜单项当前处 于活动状态。
（8）有效：该复选框用于设置菜单项的操作状
第四章 菜单与工具栏设计
4.1.1 任务一 菜单控件 在Visual Basic中，菜单也是一个图形 对象，即控件。与其他控件一样，菜单 也需要定义它的外观和属性。在设计菜 单和运行菜单时可以设置菜单的Caption 属性、Enable属性、Visible属性、 Checked属性及其他属性。每个菜单项都 可以接收Click事件，当用鼠标或键盘选 中该菜单项时，将调用该事件。