以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]textbox如何实现多值同时搜索?  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=67754)

--  作者:332595
--  发布时间:2015/4/30 18:17:00
--  [求助]textbox如何实现多值同时搜索?
请教下各位老师textbox控件的textchanged事件中如何可以同时多条件进行搜索?
比如我在textbox中输入:行政部王军李娜
即表示我想搜索下整个表中第一条件包含行政部,并且在满足第一条件的情况下第二条件包含王军,李娜这二个关键信息的记录!
这里的分号即表示前面为第一条件,后面为满足第一条件后的第二条件。
如果textbox中没有分号,如:王军,李娜   即表示搜索关键字包含王军和李娜的这二条信息。

希望老师指点!!

--  作者:e-png
--  发布时间:2015/4/30 20:12:00
--  

用split分开 ; 再分开 , 号。。。


--  作者:大红袍01
--  发布时间:2015/5/3 22:34:00
--  

参考代码

 

Dim ss As String = "行政部;王军,李娜"
Dim filter As String = "1=1"
For Each s As String In ss.Split(new Char(){";", ","})
    dim temp as string = " and (1=2"
    For Each c As Col In Tables("表B").Cols
        temp &= " or " & c.Name & " Like \'%" & s & "%\'"
    Next
    filter &= temp & ")"
Next

output.show(filter)


--  作者:sloyy
--  发布时间:2015/5/3 22:59:00
--  
对于一个好的系统而言,这种查询方法是要严格禁止的,因为你很可能因为输错了标点符号而导致错误的输出,难道不能再用一个textbox来输入部门吗?