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 時，條件告訴程序停止。