组合键问题

Question

在我程序运行的窗体里如何利用vb控件(如text控件，mediaplay控件)的key事件设置组合键？我主要是想利用alt键，例如：alt+1,alt+2等触发我自己的sub？
能不用api就不用，baidu搜索的那篇出镜率最高的文章介绍的方法似乎不管用，我主要是在WindowsMediaPlayer1_KeyDown方法里监控组合键触发。

Answer 1

Private Sub WindowsMediaPlayer1_KeyDown(keycode As Integer, shift As Integer)
    If shift And VbAltMask Then
        Select Case keycode
            Case vbKey1
                'Process your event here
            Case vbKey2
                'Process your event here
        End Select
    End If
End Sub

Answer 2

哇考，老兄真快阿，哪收藏的代码？注释的英文句子挺漂亮的，呵呵，thks!