关于分页后的筛选？请教 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 关于分页后的筛选？请教

共有2666人关注过本帖树形打印复制链接主题：关于分页后的筛选？请教

zhy400137

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

等级：五尾狐帖子：1133 积分：8227 威望：0 精华：0 注册：2013/11/3 19:00:00

关于分页后的筛选？请教 发帖心情

Post By：2015/3/25 10:03:00 [显示全部帖子]

我对名叫“录入清单”的表格进行了分页

With DataTables("录入清单")

.LoadFilter = "[姓名] ='" & User.Name & "'" '一定要清除加载条件

.LoadTop = 15

.LoadPage = 0

.Load()

End With

运行正常，但我想加入个在快捷菜单中的快速筛选功能，比如同年的数据，

用了以下代码

Dim y As Integer = Date.today.Year

Dim dt1 As New Date(y, 1, 1)

Dim dt2 As New Date(y, 12, 31)

Dim Filter As String

Filter = "日期 >= #" & dt1 & "# And 日期 <= #" & dt2 & "#"

Tables("录入清单").Filter = Filter

代码可以用，但发现筛选的数据只是对当前页进行了筛选，不是所以数据，请教老师应该如何

处理，谢谢！

zhy400137

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

等级：五尾狐帖子：1133 积分：8227 威望：0 精华：0 注册：2013/11/3 19:00:00

Post By：2015/3/25 10:18:00 [显示全部帖子]

顶上去！！！

zhy400137

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

等级：五尾狐帖子：1133 积分：8227 威望：0 精华：0 注册：2013/11/3 19:00:00

Post By：2015/3/25 10:35:00 [显示全部帖子]

我试试，谢谢老师！

主题：关于分页后的筛选？请教