主题：[求助]窗口附表打开隐藏列问题

窗口附表打开隐藏列问题,

 

表A.表B关联

 

在表A增加出口"AB1" 【按KeyDown打开】,表A.表B为非副本；

 

AfterLoad:If User.name = "XXX"
    Tables("表A.表B").Cols("第三列").Visible = False
End If

 

在表B增加出口"AB2" 【按KeyDown打开】,表A.表B为副本；

 

AfterLoad:If User.name = "XXX"
    Tables("表A.表B").Cols("第三列").Visible = False
End If

 

在表A中得窗口“AB1”中“第三列”被隐藏；在表B中的窗口“AB2”中“第三列”没有被隐藏；

 

问题：如何是现在表B中打开窗口“AB2"后隐藏"第三列”？

 

 

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:窗口附表打开隐藏列问题.foxdb

AfterLoad事件代码改为这样试试，建议类似的问题先搜索在提问，这样的问题论坛的回答已经很多了：

 

Tables("表A.表B").Cols("第三列").Visible = (User.name = "管理员")

我在表A窗口“AB1" 

AfterLoad:

Tables("表A.表B").Cols("第三列").Visible = (User.name = "管理员")

在表A用"XXX"用户打开窗口"AB1"，可以隐藏第三列，

 

问题

我在表B窗口“AB2" 

AfterLoad:

Tables("表A.表B").Cols("第三列").Visible = (User.name = "管理员")

在表B用"XXX"用户打开窗口"AB2"，不能隐藏第三列，

 

 

 

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:窗口附表打开隐藏列问题.foxdb

记住了：关联表要在父表打开才有效，在子表的窗口打开新增或者删除记录会有错误，包括一些事件的取值，因此，您写在表A的AB1窗口的AfterLoad事件试一试！

OK了！