主题：权限多级控制

If User.Name = "经理" Then
    DataTables("计划表").LoadFilter = ""
Else
    DataTables("计划表").LoadFilter = "部门 = '" & User.Group & "'"
End If
DataTables("计划表").Load()

 

 

多个部门  制造   设计部

下面各有

经理

主管

职员

 

   我想如果部门 经理 登陆看到部门的全部  主管看到所主管的全部  职员只能看到自己的内容  怎么解决  求助！！