Foxtable(狐表)用户栏目专家坐堂 → 代码无实现不见


  共有5130人关注过本帖树形打印复制链接

主题:代码无实现不见

帅哥哟,离线,有人找我吗?
lgz518
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1257 积分:8555 威望:0 精华:0 注册:2019/6/13 9:57:00
代码无实现不见  发帖心情 Post By:2022/12/14 16:52:00 [只看该作者]

需求:外部数据源,当前用户的角色为“普通查询”,入库明细是副表,入库查询窗口打开后“单价、金额”为不可见

下面代码二种都不能实现,如何实现?
If _UserRole ="普通查询" Then

  Tables("入库查询_入库明细").Cols.Remove("单价")
   Tables("入库查询_入库明细").Cols.Remove("金额")
End If 




If _UserRole = "普通查询" Then
    
    Tables("入库明细").Cols.Remove("单价")
    Tables("入库明细").Cols.Remove("金额")
End If 

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110574 积分:562760 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/12/14 17:17:00 [只看该作者]

代码放在哪里的?

调试
msgbox(_UserRole)
If _UserRole ="普通查询" Then
msgbox(Tables("入库查询_入库明细").Cols.contains("单价"))
  Tables("入库查询_入库明细").Cols.Remove("单价")
msgbox(Tables("入库查询_入库明细").Cols.contains("单价"))
   Tables("入库查询_入库明细").Cols.Remove("金额")
End If 

 回到顶部
帅哥哟,离线,有人找我吗?
lgz518
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1257 积分:8555 威望:0 精华:0 注册:2019/6/13 9:57:00
  发帖心情 Post By:2022/12/14 17:34:00 [只看该作者]

入库查询窗口的窗口打开后事件里

 回到顶部
帅哥哟,离线,有人找我吗?
lgz518
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1257 积分:8555 威望:0 精华:0 注册:2019/6/13 9:57:00
  发帖心情 Post By:2022/12/14 17:41:00 [只看该作者]

AfterLoad



2楼代码测试,弹出窗口无内容



 回到顶部