您正在看的VB|VB.NET是:vb菜单在应用程序中的使用。 间列出各个菜单项。有关应用程序本地化的更详细内容，请参阅第十六章“国际发行”。

　　菜单命名约定

　　为了使代码更可读和更易维护，在菜单编辑器中设置 Name 属性时遵循已确定的命名约定是一个好办法。大多数命名约定规则都建议用前缀来标识对象(即，对菜单控件用 mnu)，其后紧跟顶层菜单的名称(如 File)。对于子菜单，其后再紧跟该子菜单的标题(如 mnuFileOpen)。

　　详细信息 有关所建议的命名约定的示例，请参阅附录 B“Visual Basic 编码约定”。有关所建议的命名约定的示例，请参阅“Visual Basic 编码约定”。

　　创建子菜单

　　所创建的每个菜单可以包含最多五级子菜单。子菜单会分支出另一个菜单以显示它自己的菜单项。需使用子菜单的场合有：

　　菜单栏已满。

　　某一特定菜单控件很少被用到。

　　要突出某一菜单控件与另一个的关系。

　　然而，如果菜单栏中还有空间，最好再创建一个菜单标题而不是子菜单。这样，当菜单拉下时所有控件都可见。限制使用子菜单也是一种好的编程策略，它可以免去查找应用程序菜单界面的负担(大多数应用程序都只使用一级子菜单)。

　　在菜单编辑器中，在不是菜单标题的菜单控件之下缩进的任何菜单控件，都是子菜单控件。一般来说，子菜单控件可以包括子菜单项、分隔符条和子菜单标题。

　　要创建子菜单，请按照以下步骤执行：

　　1. 创建想作为子菜单标题的菜单项。

　　2. 创建将出现在新子菜单中的各个项目，然后单击右箭头按钮将它们缩进。

　　在菜单编辑器中每一缩进级前都加了四个点 (....)。要删除一缩进级，单击左箭头按钮。

　　注意 如果想用多于一级的子菜单，可以考虑使用对话框来替代。对话框允许在一个地方指定好几个选择。关于使用对话框的内容，请参阅本章后面的“对话框”。

　　创建菜单控件数组

　　菜单控件数组就是在同一菜单上共享相同名称和事件过程的菜单项目的集合。菜单控件数组使用于：

　　在运行时要创建一个新菜单项，它必须是控件数组中的成员。如 MDINotepad 示例，它就用一个菜单控件数组来存储新近打开的文件清单。

　　简化代码，因为通用代码块可以被所有菜单项使用。

　　每个菜单控件数组元素都由唯一的索引值来标识，该值在菜单编辑器上“Index 属性框”中指定。当一个控件数组成员识别一个事件时，Visual Basic将其 Index 属性值作为一个附加的参数传递给事件过程。事件过程必须包含有核对 Index 属性值的代码，因而可以判断出正在使用的是哪一个控件。

　　详细信息 关于控件数组的详细信息，请参阅第七章“使用 Visual Basic 的标准控件”中的“使用控件数组”。要在菜单编辑器中创建菜单控件数组，请按照以下步骤执行：

　　1. 选取窗体。

　　2. 从“工具”菜单中，选取“菜单编辑器”。

　　- 或 -

　　在“工具栏”上单击“菜单编辑器”按钮。

　　3. 在“标题”文本框中，键入想出现在菜单栏中的第一个菜单标题的文本。菜单标题文本显示在菜单控件列表框中。

　　4. 在“名称”文本框中，键入将在代码中用来引用菜单控件的名称。保持“索引”框是空的。

　　5. 在下一个缩进级，通过设定“标题”和“名称”来创建将成为数组中第一个元素的菜单项。

　　6. 将数组中第一个元素的“索引”设置为 0。

　　7. 在第一个的同一缩进级上创建第二个菜单项。

　　8. 将第二个元素的“名称”设置成与第一个元素相同，且把它的“索引”设置为 1。

　　9. 对于数组中的后续元素重复步骤 5- 8。

　　重点 菜单控件数组的各元素在菜单控件列表框中必须是连续的，而且必须在同一缩进级上。创建菜单控件数组时，要把在菜单中出现的分隔符条也包括进去。

　　运行时创建和修改菜单

　　设计时创建的菜单也能动态地响应运行时的条件。例如，如果菜单项的动作在某些点上成为不适当时，通过使其失效可防止对该菜单项的选取。比如：在 MDI NotePad 应用程序中，如果剪贴板上没有任何文本，则“编辑”菜单中的“粘贴”菜单项变暗，因而就不能被选。

　　如果有一个菜单控件数组，也可以动态地增加菜单项。这将在本主题后面的“运行时添加菜单控件”中讲述。

　　也可以编写应用程序，使用复选标志来指示几个命令中的哪一个是最后选取的。例如：如果工具栏被显示，MDI NotePad 应用程序工具栏的“选项”菜单项就会显示一个复选标志。本节描述的其它菜单控件功能包括使菜单项可见或不可见以及增加或删除菜单项操作的代码。

　　使菜单命令有效或无效

　　所有的菜单控件都具有 Enabled 属性，当这个属性设为 False 时，菜单命令无效使它不响应动作。当 Enabled 设为 False 时，快捷键的访问也无效。一个无效的菜单控件会变暗，如图 6.11 所示的“粘贴”菜单项。

　　

　　例如：下列语句使 MDI NotePad 应用程序中“编辑”菜单上的“粘贴”菜单项无效。

　　mnuEditPaste.Enabled = False

　　菜单标题的无效使得整个菜单无效，因为不首先单击菜单标题，就不能访问任何菜单项。例如：下列代码将使 MDI NotePad 应用程序的“编辑”菜单无效。

　　mnuEdit.Enabled = False

　　显示菜单控件上的复选标志

　　使用 Checked 属性，可以把一个复选标志放置在菜单上，以便：

　　表示打开/关闭条件的状态。选取菜单命令可交替地增加和删除此复选标志。

　　指示几个模式中哪一个正在起作用。MDI NotePad 应用程序的“选项”菜单使用复选标志来指示工具栏的状态，如图 6.12 所示。

　　在 Visual Basic 中可以用 Checked 属性来创建复选标志。通过选取被标记为 Checked 的复选框来设置菜单编辑器中的 Checked 属性的初始值。在运行时要从一个菜单控件上增加或删除复选标志，可以从代码中设置它的Checked 属性。例如：

　　Private Sub mnuOptions_Click ()

　　'根据 Visible 属性设置复选标志的状态。

　　mnuOptionsToolbar.Checked = picToolbar.Visible

　　End Sub

　　

　　使菜单控件不可见

　　在菜单编辑器中，通过选取被标记为 Visible 的复选框，可以设置菜单控件的 Visible 属性的初值。在运行时，要使一个菜单控件可见或不可见，可以从代码中设置其 Visible 属性。例如：

　　mnuFileArray(0).Visible = True　'