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