梯形螺纹车刀前角:在VB中如何设置快捷键?

来源:百度文库 编辑:杭州交通信息网 时间:2024/04/29 08:04:00
我在VB里编的一个程序想设置一个快捷键用来退出,但不知道命令怎样编写?
大虾们帮帮忙啊

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,就可以读出来了.

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