Toolbar的快捷方式

Question

我在窗体上放了Toolbar控件，并设置了新建，保存，删除功能，
现在我想设置快捷方式，比如：Alt+N 新建； Alt+S 保存；Alt+D 删除
应该怎么做？

Answer 1

一般Toolbar的功能都是放到菜单上处理的,而菜单上有快捷键.

Answer 2

比如下面，我指定的项目的快捷键分别为ctrl+o,ctrl+q
   Begin VB.Menu mnuPopup 
      Caption         =   "文件"
      Visible         =   0   'False
      Begin VB.Menu mnuOpen 
         Caption         =   "打开"
         Shortcut        =   ^O
      End
      Begin VB.Menu mnuQuit 
         Caption         =   "退出(&Q)"
         Shortcut        =   ^Q
      End
   End

Answer 3

一种笨方法，把事件过程写在窗体的KeyDown事件里面，判断按下的键。

Answer 4

怎样接受组合键？
KeyDown可以接受一个键，但组合键呢？

Answer 5

//怎样接受组合键？
KeyDown可以接受一个键，但组合键呢？利用KeyDown事件中的Shift的值进行判定：Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
    If Shift = 4 Then  '如果按下了alt键（按下shift键时shift=1，按下ctrl键时shift=2，按下alt键时shift=4）        
        If KeyCode = 78 Then
            MsgBox "你按下了ALT-N"
        ElseIf KeyCode = 79 Then
            MsgBox "你按下了ALT-O"
        ElseIf KeyCode = 79 Then
            MsgBox "你按下了ALT-P"
        End If
    End If
End Sub