主题：甜老师,帮帮编写循环查看

执行完"最后一条"

With Tables("表名")
    .Position = .Rows.Count - 1
End With

命令后,继续执行这条命令,继续从查看第一条开始执行,

这样写的问题错在什么地方?

With Tables("表A")
    .Position = .Rows.Count - 1
End With
If Tables("表A").Rows.Count = 0 Then
Tables("表A").Position = 0
End If

dim t as table = Tables("表A")

If t.Rows.Count = t.position+1 Then
    t.Position = 0
else
    t.Position += 1
End If