新建一个窗口,加入以下代码:
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
If Key=F2 Then
msgbox "你按下了F2键"
End If
End Sub
这个可以修改成你需要的,我这个只是演示。
用keydown事件里的keycode的值可以指定F1等的键值
用菜单编辑器建立菜单后,可以选择菜单项目的呼出方式,不必再编写代码。
======================================
菜单可以设作隐藏,这样就不会被别人看到了。
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
If Key = vbKeyF1 Then
MsgBox "你按下了F1键"
End If
If Key = vbKeyF2 Then
MsgBox "你按下了F2键"
End If
End Sub