VB中F1 F2等键的应用

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

用菜单编辑器建立菜单后，可以选择菜单项目的呼出方式，不必再编写代码。
======================================
菜单可以设作隐藏，这样就不会被别人看到了。

用keydown事件里的keycode的值可以指定F1等的键值

新建一个窗口，加入以下代码：
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
If Key＝F2 Then
msgbox "你按下了F2键"
End If
End Sub

这个可以修改成你需要的，我这个只是演示。