VBScript 循環(huán)語(yǔ)句

2022-08-19 09:52 更新
VBScript 循環(huán)用于重復(fù)執(zhí)行一組語(yǔ)句,本節(jié)介紹了四種循環(huán)語(yǔ)句。

循環(huán)語(yǔ)句

循環(huán)語(yǔ)句用于運(yùn)行相同的代碼塊指定的次數(shù)。Looping statements are used to run the same block of code a specified number of times.

在 VBScript 中,我們可以使用四種循環(huán)語(yǔ)句:

  • For...Next 語(yǔ)句 - 運(yùn)行一段代碼指定的次數(shù)
  • For Each...Next 語(yǔ)句 - 針對(duì)集合中的每個(gè)項(xiàng)目或者數(shù)組中的每個(gè)元素來(lái)運(yùn)行某段代碼
  • Do...Loop 語(yǔ)句 - 運(yùn)行循環(huán),當(dāng)條件為 true 或者直到條件為 true 時(shí)
  • While...Wend 語(yǔ)句 - 不要使用這個(gè)語(yǔ)句 - 請(qǐng)使用 Do...Loop 語(yǔ)句代替它

For...Next 循環(huán)

請(qǐng)使用 For...Next 語(yǔ)句運(yùn)行一段代碼指定的次數(shù)。

For 語(yǔ)句規(guī)定計(jì)數(shù)變量(i)以及它的初始值和結(jié)束值。Next 語(yǔ)句會(huì)以 1 作為步進(jìn)值來(lái)遞增變量(i)。

實(shí)例

<html>
<body>

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

</body>
</html>

嘗試一下 ?

Step 關(guān)鍵詞

通過(guò) Step 關(guān)鍵詞,您可以規(guī)定計(jì)數(shù)變量遞增或遞減的步進(jìn)值。

在下面的實(shí)例中,計(jì)數(shù)變量(i)每次循環(huán)的遞增步進(jìn)值為 2。

For i=2 To 10 Step 2
some code
Next

如果要遞減計(jì)數(shù)變量,您就必須使用負(fù)的 Step 值。并且必須規(guī)定小于開(kāi)始值的結(jié)束值。

在下面的實(shí)例中,計(jì)數(shù)變量(i)每次循環(huán)的遞減步進(jìn)值為 2。

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

退出 For...Next

您可以通過(guò) Exit For 關(guān)鍵詞退出 For...Next 語(yǔ)句。

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

For Each...Next 循環(huán)

For Each...Next 針對(duì)集合中的每個(gè)項(xiàng)目或者數(shù)組中的每個(gè)元素來(lái)重復(fù)運(yùn)行某段代碼。

實(shí)例

<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

如果你不知道重復(fù)多少次,可以使用 Do...Loop 語(yǔ)句。

Do...Loop 語(yǔ)句重復(fù)執(zhí)行某段代碼直到條件是 true 或條件變成 true。

重復(fù)執(zhí)行代碼直到條件是 true

您可以使用 While 關(guān)鍵字來(lái)檢查 Do... Loop 語(yǔ)句的條件。

Do While i>10
some code
Loop

如果 i 等于 9,上述循環(huán)內(nèi)的代碼將終止執(zhí)行。

Do
some code
Loop While i>10

這個(gè)循環(huán)內(nèi)的代碼將被執(zhí)行至少一次,即使 i 小于 10。

重復(fù)執(zhí)行代碼直到條件變成 true

您可以使用 Until 關(guān)鍵字來(lái)檢查 Do...Loop 語(yǔ)句的條件。

Do Until i=10
some code
Loop

如果 i 等于 10,上述循環(huán)內(nèi)的代碼將終止執(zhí)行。

Do
some code
Loop Until i=10

這個(gè)循環(huán)內(nèi)的代碼將被執(zhí)行至少一次,即使 i 等于 10。

退出 Do...Loop

您可以通過(guò) Exit Do 關(guān)鍵詞退出 Do...Loop 語(yǔ)句。

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

這個(gè)循環(huán)內(nèi)的代碼,只要 i 不為 10 且 i 大于 10 時(shí)都將被執(zhí)行。


實(shí)例s

更多實(shí)例(僅適用于 IE)

循環(huán)遍歷標(biāo)題
如何循環(huán)遍歷 html 中的六個(gè)標(biāo)題。

Do...While loop
如何做一個(gè)簡(jiǎn)單的 Do...While 循環(huán)。

以上就是 VBScript 循環(huán)語(yǔ)句的全部?jī)?nèi)容了,現(xiàn)在你可以自己動(dòng)手通過(guò)代碼熟悉該語(yǔ)句的使用啦!
以上內(nèi)容是否對(duì)您有幫助:
在線(xiàn)筆記
App下載
App下載

掃描二維碼

下載編程獅App

公眾號(hào)
微信公眾號(hào)

編程獅公眾號(hào)