Foxtable(狐表)用户栏目专家坐堂 → [求助]关于筛选显示的问题


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

主题:[求助]关于筛选显示的问题

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


加好友 发短信
等级:婴狐 帖子:26 积分:216 威望:0 精华:0 注册:2017/8/10 16:57:00
[求助]关于筛选显示的问题  发帖心情 Post By:2017/8/12 16:01:00 [显示全部帖子]

我想做一个查询的窗口。从表A查询出来的内容显示在表B里面,表A显示的内容不变,怎么做啊!

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


加好友 发短信
等级:婴狐 帖子:26 积分:216 威望:0 精华:0 注册:2017/8/10 16:57:00
  发帖心情 Post By:2017/8/12 16:04:00 [显示全部帖子]

Dim txt As String = e.Form.Controls("TextBox1").Text
Dim tbl As Table = Tables("表A")
Dim tbb As Table = Tables("表B")
If txt = "" Then
    tbl.Filter = ""
Else
    txt = "'%" & txt & "%'"
    tbb.Filter = "公司名称 Like " & txt & " Or 公司地址 Like " & txt 
End If
这段代码有问题吗?

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


加好友 发短信
等级:婴狐 帖子:26 积分:216 威望:0 精华:0 注册:2017/8/10 16:57:00
  发帖心情 Post By:2017/8/12 16:05:00 [显示全部帖子]

那个大神给看看

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


加好友 发短信
等级:婴狐 帖子:26 积分:216 威望:0 精华:0 注册:2017/8/10 16:57:00
  发帖心情 Post By:2017/8/12 16:13:00 [显示全部帖子]

谢谢啊

 回到顶部