[求助]筛选窗口不工作 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]筛选窗口不工作

共有21952人关注过本帖树形打印复制链接主题：[求助]筛选窗口不工作

shihao821004

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：婴狐帖子：37 积分：387 威望：0 精华：0 注册：2008/11/12 17:20:00

[求助]筛选窗口不工作 发帖心情

Post By：2009/1/19 13:26:00 [只看该作者]

想对姓名列筛选，

此主题相关图片如下：qq截图未命名.bmp

Dim Filter As String

With e.Form.Controls("TextBox1")

If .Value IsNot Nothing Then

Filter = "姓名 = '" & .Value & "'"

End If

End With

请老师帮忙看下哪里的问题，谢谢

狐狸爸爸

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：管理员帖子：47511 积分：251479 威望：0 精华：91 注册：2008/6/17 17:14:00

Post By：2009/1/19 13:38:00 [只看该作者]

With e.Form.Controls("TextBox1")

If .Value IsNot Nothing Then

Tables("表名").Filter = "姓名 = '" & .Value & "'"

End If

End With

blackzhu

小大 3楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：狐仙帖子：9879 积分：57640 威望：0 精华：15 注册：2008/9/1 9:45:00

Post By：2009/1/21 8:48:00 [只看该作者]

以下是引用shihao821004在2009-1-19 13:26:00的发言：
想对姓名列筛选，
图片点击可在新窗口打开查看

此主题相关图片如下：qq截图未命名.bmp

Dim Filter As String

With e.Form.Controls("TextBox1")

If .Value IsNot Nothing Then

Filter = "姓名 = '" & .Value & "'"

End If

End With

请老师帮忙看下哪里的问题，谢谢

你这个要筛选的是那张表都没有说明,这么会筛选呢?帮助中的窗口筛选列子中,下面的一小部分没有看见吗?再看看.

主题：[求助]筛选窗口不工作