VBScript 循環語句

上一頁： VBScript條件語句

下一頁： VBScript總結

循環語句

循環語句用於運行相同的代碼塊指定的次數。 Looping statements are used to run the same block of code a specified number of times.

在VBScript 中，我們可以使用四種循環語句：

For...Next語句 -運行一段代碼指定的次數
For Each...Next語句 -針對集合中的每個項目或者數組中的每個元素來運行某段代碼
Do...Loop語句 -運行循環，當條件為true或者直到條件為true時
While...Wend語句 -不要使用這個語句-請使用Do...Loop語句代替它

For...Next 循環

請使用For...Next語句運行一段代碼指定的次數。

For語句規定計數變量（ i）以及它的初始值和結束值。Next語句會以1作為步進值來遞增變量（ i）。

實例

<html>
<body>

<script type="text/vbscript">
For i = 0 To 5
document.write("The number is " & i & "<br />")
Next
</script>

</body>
</html>

嘗試一下»

Step 關鍵詞

通過Step關鍵詞，您可以規定計數變量遞增或遞減的步進值。

在下面的實例中，計數變量（i ）每次循環的遞增步進值為2。

For i=2 To 10 Step 2
some code
Next

如果要遞減計數變量，您就必須使用負的Step值。 並且必須規定小於開始值的結束值。

在下面的實例中，計數變量（i ）每次循環的遞減步進值為2。

For i=10 To 2 Step -2
some code
Next

退出For...Next

您可以通過Exit For 關鍵詞退出For...Next 語句。

For i=1 To 10
If i=5 Then Exit For
some code
Next

For Each...Next 循環

For Each...Next針對集合中的每個項目或者數組中的每個元素來重複運行某段代碼。

實例

<html>
<body>

<script type="text/vbscript">
Dim cars(2)
cars(0)="Volvo"
cars(1)="Saab"
cars(2)="BMW"

For Each x In cars
document.write(x & "<br />")
Next
</script>

</body>
</html>

嘗試一下»

Do...Loop

如果你不知道重複多少次，可以使用Do...Loop 語句。

Do...Loop 語句重複執行某段代碼直到條件是true 或條件變成true。

重複執行代碼直到條件是true

您可以使用While 關鍵字來檢查Do... Loop 語句的條件。

Do While i>10
some code
Loop

如果i等於9，上述循環內的代碼將終止執行。

Do
some code
Loop While i>10

這個循環內的代碼將被執行至少一次，即使i小於10。

重複執行代碼直到條件變成true

您可以使用Until 關鍵字來檢查Do...Loop 語句的條件。

Do Until i=10
some code
Loop

如果i等於10，上述循環內的代碼將終止執行。

Do
some code
Loop Until i=10

這個循環內的代碼將被執行至少一次，即使i等於10。

退出Do...Loop

您可以通過Exit Do 關鍵詞退出Do...Loop 語句。

Do Until i=10
i=i-1
If i<10 Then Exit Do
Loop

這個循環內的代碼，只要i不為10且i大於10時都將被執行。

VBScript 教程