Access VisualBasic Script

  1. Home
  2. VisualBasic Script
  3. Access
  4. Check the keycode
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
        If KeyCode = vbKeyPageDown Or _
         KeyCode = vbKeyPageUp Then
         KeyCode = 0
        End If
End Sub