以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  多值筛选  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=132157)
--  作者：sdscen
--  发布时间：2019/3/15 10:04:00
--  多值筛选

数据表列为多值列，条件为列表框，也是多选，我想模糊筛选列中数据，请问怎么写代码，谢谢
--  作者：有点甜
--  发布时间：2019/3/15 10:14:00
--  

Dim str As String = "1,2,3,4,5"

Dim nstr As String = ""

For Each s As String in str.split(",")

    nstr &= " or 第一列 like \'%" & s & "%\'"

Next

nstr = nstr.substring(3)

msgbox(nstr)
--  作者：sdscen
--  发布时间：2019/3/15 16:24:00
--  
nstr = nstr.substring(3)
为什么开始位置是3，有特殊意思吗
--  作者：有点甜
--  发布时间：2019/3/15 17:01:00
--  
以下是引用sdscen在2019/3/15 16:24:00的发言：
数据表列为多值列，条件为列表框，也是多选，我想模糊筛选列中数据，请问怎么写代码，谢谢

 

最后合成的字符是  Or 第一列 Like \'%1%\' or 第一列 like \'%2%\' or 第一列 like \'%3%\' or 第一列 like \'%4%\' or 第一列 like \'%5%\'

把前面的 or 去掉而已。