关于Toolbar1的按钮的子菜单问题
当点击Toolbar1中的某个按钮下的菜单时，在另一个窗体触发事件。该怎么写这个过程？哪个帮忙一下
[解决办法]
直接把另一个窗体(设form2)的事件(设command1_click)改成public的,然后在这个Toolbar的按钮菜单事件下写form2.command1_click
[解决办法]
'窗体1的代码Private Sub Form_Load()Toolbar1.Buttons.Add 1, "open", "打开", 0Toolbar1.Buttons(1).Style = tbrDropdownToolbar1.Buttons(1).ButtonMenus.Add 1, "WB1", "事件一"Toolbar1.Buttons(1).ButtonMenus.Add 2, "WB2", "事件二"End SubPrivate Sub Toolbar1_ButtonMenuClick(ByVal ButtonMenu As MSComctlLib.ButtonMenu)Select Case ButtonMenuCase "事件一" Form2.Form_Click Case "事件二" Form2.Form_KeyDown 37, 1 End SelectEnd Sub'窗体2的代码Public Sub Form_Click() '一定是PublicMsgBox "触发窗体Form2的Click事件"End SubPublic Sub Form_KeyDown(KeyCode As Integer, Shift As Integer) '一定是PublicMsgBox "触发窗体Form2的Form_KeyDown事件"End Sub
