Foxtable(狐表)用户栏目专家坐堂 → [原创]模糊查询 多个字段查询 显示没有操作数


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

主题:[原创]模糊查询 多个字段查询 显示没有操作数

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


加好友 发短信
等级:婴狐 帖子:7 积分:135 威望:0 精华:0 注册:2013/5/29 13:34:00
[原创]模糊查询 多个字段查询 显示没有操作数  发帖心情 Post By:2013/9/12 0:38:00 [显示全部帖子]

单查一个字段没有问题,两个一起查就出错了 缺少操作数

Dim txts() As String
Dim str As String
Dim temp As String
Dim txt As String = e.Form.Controls("TextBox1").Text
Dim tbl As Table = Tables("窗口1_Table1")
If txt = "" Then
    tbl.Filter = ""
Else
    txt = txt.TrimEnd()
    txts= txt.Split(" ")
    For Each str In txts
        str = "'*" & str & "*'"
       
        str= "公司名称 Like" & str & "And"
    Next
    str= str.TrimEnd("d","n","A")
   

    tbl.Filter =  str.Replace("公司名称","编号")& "or" & str


图片点击可在新窗口打开查看此主题相关图片如下:未命名.jpg
图片点击可在新窗口打开查看
[此贴子已经被作者于2013-9-12 0:44:47编辑过]

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


加好友 发短信
等级:婴狐 帖子:7 积分:135 威望:0 精华:0 注册:2013/5/29 13:34:00
  发帖心情 Post By:2013/9/12 0:40:00 [显示全部帖子]

操作例子
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:模糊查询.rar


 回到顶部