再问以下----如何在多文档窗口中建立类似与“Alt + Q”这样的快捷键？

Question

用vb的菜单编辑器所建立的快捷键中没有以“Alt”开头的（只有一个Alt+Bksp），请问各位大哥该如何建立类似与“Alt + Q”这样的快捷键？我看到一个方法是利用了窗体的keypreview属性和keydown或keyup方法，但对于多文挡窗体没有keypreview属性，又该如何办呢？还有该怎么样将“Alt + Q”写在一个菜单后面呢？我把“Alt + Q”作为菜单名称的一部分写在后面，但总不能与其他的快捷键对齐！！

Answer 1

1.你可以用以下的API来建立任意方式的快捷键,但要通过拦截消息才能处理
Private Declare Function CreateAcceleratorTable Lib "user32" Alias "CreateAcceleratorTableA" (lpaccl As ACCEL, ByVal cEntries As Long) As Long
2.如你所说,检测按键事件,标题在设置方法
Private sub Form_load()
...
mnuQuit.caption="退出" & vbtab & "Alt +Q"
...
end sub