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

各位大佬帮忙看下以下代码，数据表内数据行已远超过窗口显示行数，点击此按钮，焦点移至数据行最下面一行，但是在进行筛选后，就不起效了，求教，如何处理才能让其在进行筛选后，仍能将焦点移至最下面一行数据处。

代码如下：

Dim dr As DataRow

dr = DataTables("明细根表").Find("[生产信息_施工单位] Is Not null","CCSJ desc")

If dr IsNot Nothing Then

Dim wz As Integer = Tables("明细根表").FindRow(dr)

If wz >= 0 Then

Tables("明细根表").Position = wz

End If

主题：焦点移至数据列最底行问题