为什么不能给按钮菜单设置快捷键啊?

Question

Private Sub Toolbar1_ButtonMenuClick(ByVal ButtonMenu As MSComctlLib.ButtonMenu)
    
    Select Case ButtonMenu.Index
        Case 1
            App.HelpFile = App.Path + "\帮助\help.chm"
            SendKeys "{F1}"
        
    End Select
    
End Sub为什么F1无效啊(用鼠标可以)?

Answer 1

ToolBar?
你设置关键字 然后对关键字进行选择啊

Answer 2

有index就不需要关键字了
问题是按F1不能调用帮助文件

Answer 3

App.HelpFile = App.Path + "\帮助\help.chm"
_____________________________________________
将上面这句挪到Form_load里面吧，你写在Toolbar1_ButtonMenuClick里面，按F1的时候
App.HelpFile=""，怎么会出来帮助呢？！