主题：动态加载初始不加载表

Select Case e.DataTableName
    Case "表A"
        Select Case e.user.name
            Case "张三", "李四"
                e.Cancel = True
            Case Else
        End Select
    Case "表B"
        Select Case e.user.name
            Case "李四"
                e.Cancel = True
            Case Else
        End Select
    Case "表C"
        e.Cancel = (e.User.Name = "王五")
End Select