For...Next 陳述式範例
本範例使用 For...Next 陳述式來建立一個字串，其內容為由 0 到 9 的十個數字所組成的字串，每個字串之間用空格隔開。外層迴圈使用一個變數當作迴圈計數器，其計數方式是由大到小遞減的。
Dim Words, Chars, MyString
For Words = 10
To 1
Step -1
' 10 到 1 倒數執行 10 次 For Chars = 0
To 9
' 0 到 9 執行 10 次 MyString = MyString & Chars
' 將數字加入到字串中 Next Chars
' Chars 加 1，回到這個迴圈的開頭 MyString = MyString & " "
' 加入一個空格Next Words
' Words 減 1，回到這個迴圈的開頭 以特定次數來重複執行一段訪客無法瀏覽此圖片或連結，請先 註冊 或 登入會員 。。
語法
For counter = start To end [Step step] [statements]
[Exit For]
[statements]
Next [counter]
|
For…Next 陳述式的語法具有以下幾個單元：
| 單元 | 描述 |
| Counter | 必要引數，此為用做迴圈計數器的數值訪客無法瀏覽此圖片或連結，請先 註冊 或 登入會員 。，這個變數不能是一個 訪客無法瀏覽此圖片或連結，請先 註冊 或 登入會員 。，也不能是一個訪客無法瀏覽此圖片或連結，請先 註冊 或 登入會員 。元素。 |
| Start | 必要引數，計數器的初始值。 |
| End | 必要引數，計數器的終值。 |
| Step | 選擇性引數，讓計數器每次改變的間隔值，如果沒有指定，則 step 的預設值為 1。 |
| Statements | 選擇性引數，放在 For 和 Next 之間的一行或多行指令。 |
請注意
step 訪客無法瀏覽此圖片或連結，請先 註冊 或 登入會員 。可以是正數或負數，此 step 引數值會決定迴圈的執行情形，如下所述：
| 值 | 迴圈會執行，如果 |
| 正數或 0 | counter <= end |
| 負數 | counter >= end |
當所有迴圈中的陳述式都執行後，step 的值會加到 counter 中，此時，迴圈中的陳述式可能會再執行 ( 根據計數器的正負值與終值的關係 )，也可能是結束迴圈，然後從 Next 陳述式之後的指令行繼續執行。
提示 在迴圈中改變計數器的值，將會使您的程式碼不容易閱讀和除錯。
在迴圈中可以放置任意個 Exit For 陳述式，以用來離開迴， Exit For 通常與條件式共同使用，例如 If...Then ，並會將控制權轉移到 Next 之後的陳述式。
您可以將一個 For...Next 迴圈放置在另一個 For...Next 迴圈中，以造成巢狀迴圈，不過在每個迴圈中的計數器，要使用不同的變數名稱，例如底下的架構是正確的：
For I = 1 To 10 For J = 1 To 10 For K = 1 To 10 ... Next K Next JNext I附註 如果您省略 Next 陳述式中的計數器，仍可以執行迴圈，但如果 Next 陳述式比它相對應的 For 陳述式先執行，則會產生錯誤。
