Foxtable(狐表)用户栏目专家坐堂 → [求助]多值字段关联筛选


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

主题:[求助]多值字段关联筛选

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


加好友 发短信
等级:童狐 帖子:277 积分:2437 威望:0 精华:0 注册:2011/8/28 12:23:00
[求助]多值字段关联筛选  发帖心情 Post By: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

但这只能单项,如果是多值时就不行,救助代码应该如何修改?

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:传奇商店.foxdb

另外还有一个问题,如何让窗口绑定的表的列项与原表一致?
原表有10列,隐藏了5列,显示5列,窗口绑定的表如何完全一样?


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


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

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:传奇商店.zip


没有隐藏列事件,只能是隐藏后点击按钮,在按钮里设置对应的列:http://www.foxtable.com/webhelp/topics/1775.htm

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


加好友 发短信
等级:童狐 帖子:277 积分:2437 威望:0 精华:0 注册:2011/8/28 12:23:00
  发帖心情 Post By:2023/1/15 18:27:00 [只看该作者]

感谢超版,代码我好简洁,我消化一下

 回到顶部