如何实现点击toolbar中按钮菜单而链接另外的窗体

Question

在toolbar属性中的“按钮”选项里设置了“按钮菜单”，如何编码实现点击按钮菜单里的选项链接到另外的窗体

Answer 1

form1 里的toolbar_buttonclick(.....)事件
dim index as integer
select case button.index
case num   'num 为index 值，整数
form2.show

Answer 2

Private Sub Toolbar1_ButtonClick(ByVal Button As MSComctlLib.Button)
    On Error Resume Next
    Select Case Button.KEY
        Case "管理" '操作员管理
            mnuSystem_Click 0
        Case "部门" '维护部门
            mnuSystem_Click 1
        Case "维护" '维护人事档案
            mnuRenShi_Click 0
        Case "查询" '查询人事信息
            mnuQuery_Click 0
        Case "退出" '退出系统
            mnuSystem_Click 14
        Case Else
    End Select
exitLab:
End Sub

Answer 3

是toolbar的按钮中的按钮菜单buttonMenus 
比如:我做的“英语四六级管理”按钮的按钮菜单有四级管理，六级管理两个，
如何实现点击“四级管理”然后链接到“四级管理”窗体？

Answer 4

我知道了是Toolbar1_ButtonMenuClick事件
谢谢各位