Foxtable(狐表)用户栏目专家坐堂 → 关于模糊搜索


  共有3831人关注过本帖平板打印复制链接

主题:关于模糊搜索

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


加好友 发短信
等级:幼狐 帖子:146 积分:1238 威望:0 精华:0 注册:2019/12/29 16:20:00
关于模糊搜索  发帖心情 Post By:2022/5/23 10:18:00 [只看该作者]

蓝老师,“专家查询” 表的 “专家查询”窗口加一个文本框,欲实现多字段的模糊搜索,在Textchange事件添加如下代码:

For Each c1 As String In e.Form.Controls("TextBox1").Text.Split(" ")
    Dim tbl As Table = Tables("专家查询_Table1")
    If c1 = "" Then
        tbl.Filter = ""
    Else
        c1 = "'%" & c1 & "%'"
        tbl.Filter = "姓名 Like " & c1 & " Or 专业 Like " & c1 & " Or 研究领域 Like " & c1
    End If
Next

这串代码无法实现多字段模糊搜索,请问该如何改进?谢谢蓝老师

 回到顶部