以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求教]定位最后一非空行  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=140075)
--  作者：hcfbehero
--  发布时间：2019/8/29 0:17:00
--  [求教]定位最后一非空行
我有一个窗口表（统计总表_table1）,我在窗口中新建一按钮，希望通过点击按钮来实现，光标到此表的最后一非空行上，条件为此表的[年]这列上的最后一非空行上。
--  作者：sloyy
--  发布时间：2019/8/29 9:48:00
--  
http://www.foxtable.com/webhelp/topics/0553.htm


例如在订单表中，我们希望将光标定位到最后一次订购PD01产品的订单：

Dim dr As DataRow
dr = DataTables("订单").Find("[产品] = \'PD01\'", "日期 Desc")
If dr IsNot Nothing Then
    Dim wz As Integer = Tables("订单").FindRow(dr)
    If wz >= 0 Then
        Tables("订单").Position = wz
    End If
End If


你这个条件改为  ("[年] isnot null","_identify desc")

[此贴子已经被作者于2019/8/29 9:52:07编辑过]
--  作者：hcfbehero
--  发布时间：2019/8/29 23:26:00
--  
首先感谢sloyy 的帮助，使用您的代码后，有两个新问题：
1、如果我的表是窗口副本表的话，如：统计总表_Table1，请问如何更改（即替换“订单”）；
2、如果表是基础表，这个可以实现功能，但不是符合条件的最后一行，而是中间的某行，是不是我在中间插入了行，影响的。
--  作者：有点蓝
--  发布时间：2019/8/30 10:33:00
--  
Tables("订单") 改为 Tables("统计总表_Table1")

其它问题举例或者上传实例说明