VBA访问IF条件

我有一个问题，我的IF不知何故无法验证索引0上字段的正确值

以下是您指定的代码：

Private Sub Parametri()

Dim db As dao.Database
Dim rs As dao.Recordset

Set db = CurrentDb
Set rs = db.OpenRecordset("ribe")


rs.MoveLast
rs.MoveFirst

For i = 0 To rs.RecordCount
    If rs.Fields(i).Value > 2 Then

        Debug.Print rs.Fields("Lokacija_GS")
        rs.MoveNext
    End If
Next



End Sub

结果如下：

1
43.626145
43.626145
43.630122
43.632358
43.625833

应跳过索引0上的“1”值。。。但事实并非如此

这是表格：

---

例如，如果某行为0、1或NULL，我想跳过它…

以下是正确的代码

Private Sub Parametri()
    Dim db As dao.Database
    Dim rs As dao.Recordset

    Set db = CurrentDb
    Set rs = db.OpenRecordset("ribe")

    rs.MoveLast
    rs.MoveFirst

    Do While Not rs.EOF
        If rs.Fields("Lokacija_GS").Value > 2 Then _
            Debug.Print rs.Fields("Lokacija_GS")
        rs.MoveNext
    Loop

    Set rs = Nothing
    Set db = Nothing
End Sub

---

你能再给我们看一点代码吗？如果没有这一点，这篇文章就没有什么意义了。如果你现在可以检查：）只是好奇，为什么要做

rs.MoveLast

rs.MoveFirst

这是某种访问技巧吗？我真的不知道。对VBA来说非常陌生，我在大多数示例中都看到了这种结构：D，我想知道sameThank，您真是太好了，先生！不客气。如果它解决了您的问题，请随意将其标记为答案。祝你好运。我是否可能会问你更多的问题（skype或邮件），因为我真的被困在某件事上，或者只是需要一些指导，并看到你在访问方面有一些历史？