Question

在VB中如何设置快捷键？

我在VB里编的一个程序想设置一个快捷键用来退出，但不知道命令怎样编写？
大虾们帮帮忙啊

Answer 1

Private Sub Command1_Click()
MsgBox "haha"
End Sub

Private Sub Form_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
Call Command1_Click
End If
End Sub

上例，按回车即可调用按钮1。你也可以设置keyascii为别的值来实现调用不同的函数。如果不知道KeyAscii的值，可以在事件里加入msgbox keyascii，就可以读出来了.

Answer 2

在菜单编辑器里,可以为菜单中的[退出]选项加上快捷键,比如Ctrl+X.
这样不必点菜单中的[退出],可直接用Ctrl+X