以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 根据某列的不同字符显示不同列 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=127281) |
-- 作者:nxdx112 -- 发布时间:2018/11/9 21:46:00 -- 根据某列的不同字符显示不同列 共有20列,如何根据第二列的不同选择,显示不同的列。 [此贴子已经被作者于2018/11/10 15:59:35编辑过]
|
-- 作者:y2287958 -- 发布时间:2018/11/9 22:04:00 -- 上实例 |
-- 作者:有点蓝 -- 发布时间:2018/11/9 22:07:00 -- 做不到,这样的逻辑不合理。表格的列是所有行共用的。 比如第一行第二列含有七年级应该显示第5 列,但是第二行第二列含有八年级,却不能显示第5列。那么这个第5列到底是显示呢,还是不显示?
|
-- 作者:blsu33 -- 发布时间:2018/11/9 22:19:00 -- 好像 刚开始 接触 狐表 也这么 设计过 后来也不用这样,确实第一感受 不好,来回变来变去的,不知道 这样 能不能直接显示出效果 PrepareEdit If e.IsFocusCell Then \'如果是焦点所在单元格 If e.Row("第二列")="七年级" Or e.Row("第二列") Like "%七年级" Or e.Row("第二列") Like "七年级%" Or e.Row("第二列") Like "%七年级%" Then For Each c As Col In e.Table.Cols c.Visible=False Next Dim strs() As String={3,5,6,7,8,9,10}‘这块换成列名’ For Each str As String In strs e.Col(str).Visible=True Next End If End If |
-- 作者:nxdx112 -- 发布时间:2018/11/10 10:12:00 -- 自己这样想的,没有太大的实用价值,都显示也可以,谢谢各位了 |