如何在Access中禁用 Ctrl 键?为了不执行 Ctrl + S 等... 希望有人能在我的项目中帮助我。
感谢...
答案 0 :(得分:1)
答案 1 :(得分:0)
谢谢...但我认为会没事......
Option Compare Database
Option Explicit
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
'KeyCode 83 is "S" and acCtrlMask is for Ctrl
'Disabling Ctrl+S
If KeyCode = 83 And Shift = acCtrlMask Then
'Disabling Ctrl Only
'If Shift = acCtrlMask Then
MsgBox "Ctrl + S is disabled", vbInformation, "Kamote"
KeyCode = 0
End If
End Sub
Private Sub Form_Load()
KeyPreview = True
End Sub