问题1：可以放在DataColChanging事件
Tables("表名").Select(Tables("表名").Rowsel, Tables("表名").Cols("客户").Index)
问题2：去编写keydown事件，检查如果是del键，就设置一个变量，不弹出对话框。
If e.KeCode = Keys.Delete Then
Vars("不弹出") = true
Else
Vars("不弹出") = False
End If
加好友 
发短信
Post By：2015/9/9 17:25:00 [显示全部帖子]
