如何给菜单添加菜单编辑器中没有的快捷键？

给菜单添加快捷键，但菜单编辑器中又没有提供，怎么办？难道要在窗体过程中拦截键盘消息？谁有例码啊？

解决方案 »

  1.   

    在标题后面加上（&快捷键名称）
      

  2.   

    Private Sub Form_KeyPress(KeyAscii As Integer)
    if KeyAscii = 你的 then 你的菜单单击
    End Sub
      

  3.   

    用字定义的procedure,应该比Form_KeyPress更好.
      

  4.   

    我指的是下拉菜单中如ctr+N这样的快捷键啊，不是指顶级菜单的啊
      

  5.   

    先将窗体keypreview属性设为TRUE
    Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
    Select Case KeyCode
        Case 键1
            call 菜单代码1
        Case 键2
            call 菜单代码2 
        End Select
    End Sub
      

  6.   

    另外，参数Shift是说明Shift,Ctrl,Alt三键的状态。
      

  7.   

    比如给给"文件"下的"新建"菜单添加快捷键"ctrl+n",这是在菜单编辑器中选择的,而给"文件"下的"打开"项添加快捷键"alt+enter",虽然可以按sakabi说的实现其功能,但是无法使"ctrl+n"和"alt+enter"对齐啊?
      

  8.   

    下拉菜单中快捷键可以用procedure呼叫