这段筛选代码，请帮忙看下，哪里出问题了？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

在当前表中，按条件筛选指定行，并定位在当前选定行的集合的最后一行？

Dim Filter As String

With e.Form.Controls("客户")

If .Value IsNot Nothing Then

If Filter >"" Then

Filter = Filter & " And "

End If

Filter = Filter & "客户 = '" & .Value & "'"

End If

End With

If e.Form.Controls("已编").Checked = True ' 如果修改状态选择了"修改"

If Filter >"" Then

Filter = Filter & " And "

End If

Filter = Filter & "已编 = True "

End If

If Filter > "" Then

' CurrentTable.filter = Filter

CurrentTable.DataTable.LoadFilter = ""

CurrentTable.DataTable.Load

CurrentTable.Position = CurrentTable.Rows.Count - 1

End If

CurrentTable.Position = CurrentTable.Rows.Count - 1

e.Form.Controls("客户").Value = Nothing

e.Form.Controls("已编").Checked = false

主题：这段筛选代码，请帮忙看下，哪里出问题了？