VBNET是一款完全面向对象的编程语言它的出现为开发人员打造了一个功能强大性能稳定的开发平台对VBNET的开发者而言能在设计与运行时操作菜单项目是非常有帮助的这篇技巧将探索如何在设计与运行时创建和改变VBNET菜单项目
菜单是大多数应用软件中必不可少的一部分在设计时与运行时操作它们的能力对VBNET开发者是非常有帮助的在这篇技巧中我将着眼于如何在设计时与运行时创建和改变菜单项目
首先我们先回顾一些菜单的基础知识为了在您的应用软件中使用菜单您需要在设计时使用MainMenu组件创建一个主菜单项目这个MainMenu组件将允许您创建和添加新菜单和新的菜单栏使用属性窗口来改变菜单项目属性并为菜单事件创建事件处理器
在设计时创建VBNET菜单项目
您可以在表单工具箱中找到MainMenu组件为了添加MainMenu组件到您的表单上可以将该控件托拽到表单上或在该控件上用右键点击
通过MainMenu组件您可以向VBNET的Windows表单中快速而简便地添加菜单而且显示在您的表单中的菜单和运行时显示的是一样的当您输入时额外的菜单框会在第一个菜单项目的右边出现子菜单也可以按同样的方式创建如果要创建一个子菜单只需要简单地在您想扩展的菜单项目右边输入一个条目
在运行时操作VBNET菜单项目
您可以在运行时动态操作菜单项目这种动态操作是必须的如果您需要对软件用户的某一操作做出响应来显示某一组特殊的菜单而且如果用此功能来禁止菜单对错误进行响应也是很有用的您可以选择在运行时添加隐藏或者禁止菜单并可对它们旁边的复选按钮做出同样的选择
VBNET菜单项目操作代码示例
在列表A中我创建了三个新的菜单项目mnuMenuItemmnuMenuItem和mnuMenuItem我向MainMenu菜单中添加了mnuMenuItem和mnuMenuItem并设定mnuMenuItem作为mnuMenuItem的子菜单注意我将mnuMenuItem的选中属性（Checked）设为True并在这个项目旁边放置了一个复选框源码天空我还定义了两个事件mnuMenuItem_Click和mnuMenuItem_Click当用户点击了菜单之后将显示一个消息对话框列表A中的代码的运行结果应该和图B看上去相仿
列表A:
Private Sub Form_Load（）
Sub Form_Load（ByVal sender As SystemObject ByVal e As SystemEventArgs）
Handles MyBaseLoad SetMenus（）
End Sub
Private Sub SetMenus（）
Sub SetMenus（）
Dim mnuMenuItem
As MenuItem mnuMenuItem As MenuItem mnuMenuItem As MenuItem mnuMenuItem = New MenuItem（Item New EventHandler（AddressOf mnuMenuItem_Click））
MainMenuMenuItemsAdd（mnuMenuItem）
mnuMenuItem = New MenuItem（Item ）
MainMenuMenuItemsAdd（mnuMenuItem）
mnuMenuItem = New MenuItem（Item New EventHandler（AddressOf mnuMenuItem_Click））
mnuMenuItemChecked = True mnuMenuItemMenuItemsAdd（mnuMenuItem）
End Sub
Private Sub mnuMenuItem_Click（）
Sub mnuMenuItem_Click（ByVal sender As Object ByVal e As SystemEventArgs）
MessageBoxShow（Menu Item Clicked）
End Sub
Private Sub mnuMenuItem_Click（）
Sub mnuMenuItem_Click（ByVal sender As Object ByVal e As SystemEventArgs）
MessageBoxShow（Menu Item Clicked）
End Sub
VBNET菜单项目的相关创建与改变的操作就为大家介绍到这里
