Set the form.keypreview=true, then insert this to your form:
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = 112 Then MsgBox Me.ActiveControl.Name
End Sub
Hope it works!
|
Results 1 to 3 of 3
Threaded View
|
Click Here to Expand Forum to Full Width |