ineedyourhelp
MIS
I have posted something similar to this back in Aug-Sept 2004 for my forms, but now I am trying to apply the same logic to my reports.
I am trying to disable all fkey and ctrl functions when a user opens a report. I do not want them to be able to ctrl+s, or ctrl+f etc...and I do not want them to be able to use F1, F12 etc......
Thanks to RoyVidar I was able to attach the following to the KeyDown property on my forms, however, since there is no keydown property in a report, I'm not sure how to do it in a report.
Any ideas how I could use the below in a report?
(The below disables both Fkey and ctrl functions)
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
If (Shift And acCtrlMask) > 0 Then
KeyCode = 0
Shift = 0
Else
Select Case KeyCode
Case 111, 112, 113, 114, 115, 116, 117, 118, 119, 120, 121, 122, 123
KeyCode = 0
End Select
End If
End Sub
I am trying to disable all fkey and ctrl functions when a user opens a report. I do not want them to be able to ctrl+s, or ctrl+f etc...and I do not want them to be able to use F1, F12 etc......
Thanks to RoyVidar I was able to attach the following to the KeyDown property on my forms, however, since there is no keydown property in a report, I'm not sure how to do it in a report.
Any ideas how I could use the below in a report?
(The below disables both Fkey and ctrl functions)
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
If (Shift And acCtrlMask) > 0 Then
KeyCode = 0
Shift = 0
Else
Select Case KeyCode
Case 111, 112, 113, 114, 115, 116, 117, 118, 119, 120, 121, 122, 123
KeyCode = 0
End Select
End If
End Sub