Foxtable(狐表)用户栏目专家坐堂 → [求助]这样的查找条件如何写?


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

主题:[求助]这样的查找条件如何写?

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


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2014/7/7 11:58:00 [显示全部帖子]

[ 中括号要用[中括号括起来 其他的没问题

例如查找[  要用[[]

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


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2014/7/7 15:10:00 [显示全部帖子]

Dim Val As String
If InputValue(Val, "查找文件","请输入文件号:" & vbCrLf & "(模糊查找)" & vbCrLf & "输入文件号的关键词!") Then
    
    If val = "" Then
        Tables("文件表").DataTable.LoadFilter = ""
    Else
        DataTables("文件表").LoadFilter = "文件号  Like  '%" & val.Replace("[", "[[]").Replace("]", "[]]").Replace("#", "[#]") & "%'"
        Tables("文件表").DataTable.Load()
    End If
End If

 回到顶部