访问表单中的退格键删除所有记录
Backspace in access form deletes all records
我有一个带有链接到数据库 table 字段的文本框的访问表单，当我在文本框中执行 "Ctrl-A and backspace" 时，它提示我 "You are about to delete 124 records"。我怎样才能防止这种情况发生？
我试过下面的代码，但我得到了相同的结果，唯一不同的是文本没有突出显示。
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = vbKeyA And Shift = acCtrlMask Then 'Catch Ctrl+A
KeyCode = 0 'Suppress keypress
End If
End Sub
已解决** 只需添加 "no" 以允许在表单属性上删除。
我有一个带有链接到数据库 table 字段的文本框的访问表单，当我在文本框中执行 "Ctrl-A and backspace" 时，它提示我 "You are about to delete 124 records"。我怎样才能防止这种情况发生？
我试过下面的代码，但我得到了相同的结果，唯一不同的是文本没有突出显示。
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = vbKeyA And Shift = acCtrlMask Then 'Catch Ctrl+A
KeyCode = 0 'Suppress keypress
End If
End Sub
已解决** 只需添加 "no" 以允许在表单属性上删除。