主题：权限

'参考
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

嗯嗯