for 循环

For I as Integer = 1 To 10 Step 1
    code to execute
Next

步骤是可选的，步骤 1 是默认值。Step 告诉它如何计数，所以 -1 每次减去 1，步骤 5 每次通过循环增加 5。

如果需要停止循环，则可以使用 Exit For 语句，如下例所示;

Dim iIndex as integer

For I as Integer = 1 To 10 Step 1

Debug.Print  I     
iIndex = I * 10

If iIndex > 90 Then
    Exit For
End If

Loop

这里，不是打印 1 到 10，它将停在 9，因为当 iIndex 达到 90 时，条件告诉进程停止。