'参考
Select Case e.DataTableName
Case "表A"
If e.User.Name = "李四" Or e.User.Group = "库管"
e.Cancel = True
End If
Case "表C"
e.Cancel = (e.User.Name = "王五")
End Select
'或者这样
Select Case e.DataTableName
Case "表A"
e.Cancel = (e.User.Name = "李四") Or (e.User.Group = "库管")
Case "表C"
e.Cancel = (e.User.Name = "王五")
End Select
[此贴子已经被作者于2016/8/9 19:35:44编辑过]