一、

在VB开发中，菜单是用户界面的重要组成部分，它允许用户快速访问应用程序的不同功能。本文将详细介绍如何在VB中添加子菜单，以及如何通过代码实现这一功能。

二、 准备环境

在开始之前，请确保您的开发环境已正确安装VB开发工具。

• Visual Basic Windows窗体应用程序
• MenuStrip控件
• ToolStripMenuItem控件

三、 创建主菜单项

先说说在VB窗口设计器中，将MenuStrip控件拖放到窗体上。接下来 创建主菜单项，可以通过两种方式实现：

1. 使用菜单编辑器

在工具箱中，选择MenuStrip控件。

将鼠标移到窗体上，点击并拖动，创建一个MenuStrip控件。

右键单击MenuStrip控件，选择“菜单编辑器”选项。

在菜单编辑器中，创建主菜单项，如“文件”和“编辑”。

2. 使用代码

在代码编辑器中， 声明主菜单项变量：

    Dim mainMenuItem1 As New ToolStripMenuItem
    Dim mainMenuItem2 As New ToolStripMenuItem
    

将主菜单项添加到MenuStrip控件：

    Me.MenuStrip1.Items.Add
    Me.MenuStrip1.Items.Add
    

四、添加子菜单项

接下来为每个主菜单项添加子菜单项。这可以通过设置主菜单项的DropDownItems属性来实现。

在菜单编辑器中， 右键单击主菜单项，选择“添加子项”。

输入子菜单项的名称，如“新建”和“打开”。

重复上述步骤，为“编辑”主菜单项添加子菜单项“剪切”和“复制”。

声明子菜单项变量：

    Dim subMenuItem1 As New ToolStripMenuItem
    Dim subMenuItem2 As New ToolStripMenuItem
    Dim subMenuItem3 As New ToolStripMenuItem
    Dim subMenuItem4 As New ToolStripMenuItem
    

将子菜单项添加到主菜单项的DropDownItems集合：

    Me.mainMenuItem1.DropDownItems.Add
    Me.mainMenuItem1.DropDownItems.Add
    Me.mainMenuItem2.DropDownItems.Add
    Me.mainMenuItem2.DropDownItems.Add
    

五、 处理菜单项的点击事件

为了使菜单项具有实际功能，我们需要为它们添加事件处理程序。这可以通过在设计视图中双击菜单项或通过代码来完成。

1. 在设计视图中添加事件处理程序

双击菜单项，如“新建”。

在生成的事件处理函数中， 添加相关代码，如：

    Private Sub subMenuItem1_Click Handles subMenuItem1.Click
        ' 新建文件功能
    End Sub
    

2. 使用代码添加事件处理程序

在代码编辑器中，为菜单项添加事件处理程序：

    Dim subMenuItem1 As New ToolStripMenuItem
    AddHandler subMenuItem1.Click, AddressOf NewFile_Click
    

声明事件处理函数：

    Private Sub NewFile_Click
        ' 新建文件功能
    End Sub
    

通过以上步骤，我们已经在VB中成功添加并配置了子菜单。这不仅增强了应用程序的功能性，也提升了用户的操作体验。在实际开发中，开发者可以根据需要灵活地添加更多的菜单项和子菜单项，以满足不同的应用场景。

---