以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- [求助]多值字段关联筛选 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=184901) |
||||
-- 作者:rpg2813 -- 发布时间:2023/1/14 7:54:00 -- [求助]多值字段关联筛选 此主题相关图片如下:猎豹截图20230114074432.png 如图所示,“装备栏1”……的代码是 AfterSelChange里 Dim c As Col = e.Table.Cols(e.NewRange.ColSel) Select Case c.name Case "装备栏1" If Forms("窗口1").opened() Then Tables("窗口1_Table1").Filter = "阶级 <= \'" & e.Table.Current("可装备阶数") & "\' and (元素 = \'" & e.Table.Current("元素") & "\' or 元素亲和 = \'" & e.Table.Current("元素") & "\') and 类型 = \'" & e.Table.Current("装备栏1") & "\'" End If 但这只能单项,如果是多值时就不行,救助代码应该如何修改?
另外还有一个问题,如何让窗口绑定的表的列项与原表一致? 原表有10列,隐藏了5列,显示5列,窗口绑定的表如何完全一样? |
||||
-- 作者:有点蓝 -- 发布时间:2023/1/14 9:08:00 --
没有隐藏列事件,只能是隐藏后点击按钮,在按钮里设置对应的列:http://www.foxtable.com/webhelp/topics/1775.htm
|
||||
-- 作者:rpg2813 -- 发布时间:2023/1/15 18:27:00 -- 感谢超版,代码我好简洁,我消化一下 |