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

此主题相关图片如下：qq图片20180121100111.png

在开始筛选按钮设如下代码，我想实现基于当前加载树加载后的数据进行筛选，但下列代码筛选时会把所有的后台数据筛选出来。请老师指导

Dim Filter As String

With e.Form.Controls("DateTimePicker1")

If .Value IsNot Nothing Then

If Filter >"" Then

Filter = Filter & " And "

End If

Filter = Filter & "支付日期 >= '" & .Value & "'"

End If

End With

With e.Form.Controls("DateTimePicker2")

If .Value IsNot Nothing Then

If Filter >"" Then

Filter = Filter & " And "

End If

Filter = Filter & "支付日期 <= '" & .Value & "'"

End If

End With

If e.Form.Controls("RadioButton5").Checked = True ' 如果付款状态选择了"已付"

If Filter >"" Then

Filter = Filter & " And "

End If

Filter = Filter & "乡镇审核 = 1"

End If

If e.Form.Controls("RadioButton6").Checked = True ' 如果付款状态选择了"未付"

If Filter >"" Then

Filter = Filter & " And "

End If

Filter = Filter & "乡镇审核 = 0 Or 乡镇审核 Is Null"

End If

If e.Form.Controls("RadioButton2").Checked = True ' 如果付款状态选择了"已付"

If Filter >"" Then

Filter = Filter & " And "

End If

Filter = Filter & "是否结算 = 1"

End If

If e.Form.Controls("RadioButton3").Checked = True ' 如果付款状态选择了"未付"

If Filter >"" Then

Filter = Filter & " And "

End If

Filter = Filter & "是否结算 = 0 Or 是否结算 Is Null"

End If

If Filter > "" Then

Tables("S征地记录").DataTable.LoadFilter = Filter

Tables("S征地记录").DataTable.Load

有老师帮解答吗

Tables("S征地记录").DataTable.LoadFilter = Filter

Tables("S征地记录").DataTable.Load

改成

Tables("S征地记录").Filter = Filter

解决了，多谢老师

老师，现在又有一个问题，我筛选完以后，点击加载树下的翻页，又刷新加载回所有的数据，也就相当于撤消筛选。如何能让筛选出的数据象用加载树选择的数据一样，在翻页时，也只显示筛选后的数据？

以下是引用aza520在2018/1/21 23:16:00的发言：
老师，现在又有一个问题，我筛选完以后，点击加载树下的翻页，又刷新加载回所有的数据，也就相当于撤消筛选。如何能让筛选出的数据象用加载树选择的数据一样，在翻页时，也只显示筛选后的数据？

Tables("S征地记录").DataTable.LoadFilter = Filter
Tables("S征地记录").DataTable.Load

改成

Dim f As String = Tables("S征地记录").DataTable.LoadFilter
f = iif(f > "", f & " and " & filter, filter)
Tables("S征地记录").DataTable.LoadFilter = f
Tables("S征地记录").DataTable.Load

[此贴子已经被作者于2018/1/22 9:07:43编辑过]

按老师的代码修改后解决了5楼的问题，但又出现了1楼的问题，就是会把其它用户的数据筛选出来.

以下是引用aza520在2018/1/21 23:43:00的发言：
按老师的代码修改后解决了5楼的问题，但又出现了1楼的问题，就是会把其它用户的数据筛选出来.

不可能，做个例子测试。

上传了附件，请老师指导。一是征地记录窗口的筛选问题，当对“未公示”或“未结算”筛选的时候，会把其它用户的数据加载进来（老师可用用户名为“白云乡”或“良口乡”测试，开发者和管理者密码不变，其它用户口密码都是8888）。第二个问题是在导出“征地记录表“出错，想实现导出用加载树选择和筛选后当前所有页的数据。

下载信息 [文件大小：573.1 KB 下载次数：1]
点击浏览该文件:公路征拆管理系统_201801220849.zip

还有以上筛选代码，撤消筛选按钮不起作用。

主题：筛选问题