以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  让不同用户查看不同的表 如何隐藏关联表  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=52303)
--  作者：haozan
--  发布时间：2014/6/12 21:53:00
--  让不同用户查看不同的表 如何隐藏关联表
 各位老师：


在项目事件AfteOpenProject事件中设置代码：

Select Case User.Name
    Case "张三","李四"
        Tables("表A").Visible = False
    Case "王五"
        Tables("表B").Visible = False
End Select

即可使得张三或李四打开项目后，将看不到表A，王五打开项目后，将看不到表B。但是，在关联表中，隐藏的A或B表数据依然可以看到，请问如何隐藏关联表？
--  作者：有点甜
--  发布时间：2014/6/12 21:54:00
--  

 同样的，隐藏关联表

 

Tables("表A.表B").Visible = True
--  作者：haozan
--  发布时间：2014/6/12 22:03:00
--  
 老师，已经隐藏关联表，但是没有效果，不知道是怎么回事？

Select Case User.Name
    Case "人事"
        Tables("工资").Visible = False
    Case "人事"
        Tables("人事.工资").Visible = False
End Select

让人事，不能查看 人事.工资 关联表。
--  作者：有点甜
--  发布时间：2014/6/12 22:06:00
--  
Select Case User.Name
    Case "人事"
        Tables("工资").Visible = False
        Tables("人事.工资").Visible = False
End Select
--  作者：haozan
--  发布时间：2014/6/12 22:08:00
--  
 OK了，原来是多了这么一列。