以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  table用filter后无法逐行遍历  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=122186)
--  作者：affixed
--  发布时间：2018/7/20 13:11:00
--  table用filter后无法逐行遍历
 发现table用filter过滤后就无法正常的逐行遍历table中的数据行，代码如下：
CurrentTable.Filter = "第一列 = \'测试\'"
For each r As Row in CurrentTable.Rows
    Output.Show(r.Index)
Next

运行后输出的结果是0，1，0。而不是0，1，2。（filter后表格中共有3行数据）

以上问题还请各位老师帮忙看下。
--  作者：y2287958
--  发布时间：2018/7/20 14:07:00
--  
我这里测试正常
--  作者：有点甜
--  发布时间：2018/7/20 14:29:00
--  

CurrentTable.Filter = "第一列 = \'测试\'"
For i As Integer = 0 To CurrentTable.Rows.count-1
    CurrentTable.Position = i
    Dim r = CurrentTable.Rows(i)
    Output.Show(r.Index)
Next