| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 代码无实现不见 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=184586) |
| -- 作者：lgz518 -- 发布时间：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
|
| -- 作者：有点蓝 -- 发布时间：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 -- 发布时间：2022/12/14 17:34:00 -- 入库查询窗口的窗口打开后事件里 |
| -- 作者：lgz518 -- 发布时间：2022/12/14 17:41:00 -- AfterLoad 2楼代码测试，弹出窗口无内容 |