[5分]ACCESS 数据表窗体如何防止Del键误删

找到一个比较有效的办法

一般我们不会把数据表窗体单独作为一个窗体,而是作为子窗体的存在, 这样就好办了.

就是:         

 乾坤大挪移法---转移焦点法

在子窗体中的代码是如下:            当用户不小心单击到数据表子窗体的字段上,那么整列就会被选取,如果按DELETE键,那是很危险的事情, 如果用 Autokeys , {DEL} 宏进行屏蔽, 那我们就无法 delete 键 修改文本控件了, 这样就不方便了,下面的代码就解决了这个问题.      就是当鼠标点击选取到整列字段的时候, 我们把焦点转移出去.  按delete键 只会对主窗体上的文本控件有影响, 如果焦点开始位置设置好了,丝毫没有影响了. 

Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)   '   不能用Form_MouseUp事件 ,只能是这个

    If IsLoaded("主窗体") Then
          Me.Parent.txtRemarks.SetFocus             '   可以自定一个主窗体上的控件, 而且是文本控件.

          Me.Parent.txtRemarks.SelStart = Len(Nz(Me.Parent.txtRemarks, ""))   

    End If
End Sub

'''''''''''''''''' Me.Parent  就是 主窗体