vb 如何在菜单编辑器里面加入子菜单

1、直接在vb的相关窗口中，选择打开标准EXE。

2、这个时候如果没问题，就继续通过鼠标右键点击菜单编辑器进行跳转。

3、下一步d出新的对话框，需要根据实际情况确定加入的子菜单。

4、这样一来会看到图示的结果，即可达到目的了。

1、在工具栏属性页的“按钮”页中，找到你要添加下拉菜单的按钮，例如是第一个按钮，属性页下面有“添加按钮菜单”，此时“索引”文本框可用，其值自动变为“1”。

2、添加代码方法只是把工具栏按钮单击事件做一下修改，将单击事件中的Button改为ButtonMenu

这是工具栏按钮单击事件:

Private

Sub

Toolbar1_ButtonClick(ByVal

Button

As

MSComctlLib.Button)

(1)使用“索引”

Private

Sub

Toolbar1_ButtonMenuClick(ByVal

ButtonMenu

As

MSComctlLib.ButtonMenu)

Select

Case

ButtonMenu.Index

Case

1

……

Case

2

……

End

Select

End

Sub

(2)使用关键字，在属性页中，按钮菜单一栏也有“关键字”，设置相应唯一的关键字，则按以下代码

Private

Sub

Toolbar1_ButtonMenuClick(ByVal

ButtonMenu

As

MSComctlLib.ButtonMenu)

Select

Case

ButtonMenu.Key

Case

1

……

Case

2

……

End

Select

End

Sub

---