For...Next

For i = 1 To rst.Fields.Count - 1
    Debug.Print "Field " & i & " is " & rst.Fields(i).Name
Next i

• docs/programming/office_vba/for_next.txt
• Last modified: 2008/08/03 00:25
• by 127.0.0.1