以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 帮看看代码怎么修改(已解决) (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=164358) |
||||
-- 作者:wangglby -- 发布时间:2021/5/6 20:58:00 -- 帮看看代码怎么修改(已解决)
If e.DataRow("第一列") = 1 Then Dim a as string = e.DataRow("第二列")
IF dr("第三列") = true then end if Next
end if 此主题相关图片如下:捕获11.jpg [此贴子已经被作者于2021/5/7 14:19:14编辑过]
|
||||
-- 作者:有点蓝 -- 发布时间:2021/5/6 21:03:00 -- 一个列只能整体隐藏和显示,无法显示一部分,隐藏一部分 |
||||
-- 作者:wangglby -- 发布时间:2021/5/6 21:06:00 -- 放在窗口中 鼠标放在某一行 该行 某一列 隐藏的话 则看不到 可以的 [此贴子已经被作者于2021/5/6 21:06:32编辑过]
|
||||
-- 作者:有点蓝 -- 发布时间:2021/5/6 21:38:00 -- 没看懂到底想表达什么 |
||||
-- 作者:wangglby -- 发布时间:2021/5/7 10:44:00 --
又调整了下代码,还是报错。帮看看,谢谢
Dim a As String = Tables("表A").Current("第二列") [此贴子已经被作者于2021/5/7 10:44:34编辑过]
|
||||
-- 作者:有点蓝 -- 发布时间:2021/5/7 10:46:00 -- 首先这种代码不应该放到表事件处理,其次我还是没搞懂到底要做什么功能 |
||||
-- 作者:wangglby -- 发布时间:2021/5/7 10:55:00 -- 以表中的数据为例
找到第二列中包含a的行,如果这些行中的第三列有1个值为true,那就把这些行的第四列设置为可见,否则为隐藏。
找到第二列中包含r的行,如果这些行中的第三列有1个值为true,那就把这些行的第四列设置为可见,否则为隐藏。
找到第二列中包含b的行,如果这些行中的第三列有1个值为true,那就把这些行的第四列设置为隐藏,否则为隐藏。 |
||||
-- 作者:有点蓝 -- 发布时间:2021/5/7 11:05:00 -- 都说了列只能整个隐藏和显示。假如同时有下面情况,那么第四列到底是可见还是隐藏? 第二列中包含a的行,如果这些行中的第三列有1个值为true 第二列中包含r的行,如果这些行中的第三列全部都不为true
|
||||
-- 作者:有点蓝 -- 发布时间:2021/5/7 11:13:00 -- 如果是指隐藏第四列单元格里面输入的内容,到drawcell事件处理,比如 If e.Col.Name = "第四列" Then If e.Row("第二列") Like "*a*" If e.Table.Compute("count(第二列)","第二列 like \'%a%\' and 第三列=true") > 0 Then e.Text = "" End If End If End If |
||||
-- 作者:wangglby -- 发布时间:2021/5/7 11:20:00 -- 不是隐藏内容,是隐藏列,因为我做的表的列有好几十个,太多了,想根据条件隐藏或显示。
实际应用的时候是建了个窗口,窗口绑定了这个表,根据这个表的内容 是否隐藏第四列。 |