VBScript 循环

循环语句

循环语句用于将相同的代码块运行指定次数。

在 VBScript 中,我们有四个循环语句:

  • For...Next 语句- 运行代码指定次数
  • For Each...Next 语句- 为集合中的每个项目或数组的每个元素运行代码
  • Do...Loop 语句- 循环 while 或直到条件为真
  • While...Wend 语句- 不要使用它- 改用 Do...Loop 语句

For...Next 循环

使用 For...Next 语句将代码块运行指定次数。

For 语句指定计数器变量 (i) 及其起始值和结束值。 Next 语句将计数器变量 (i) 加一。

实例

<html>
<body>

<%
For i = 0 To 5
  response.write("The number is " & i & "<br />")
Next
%>

</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 Loop

For Each...Next 循环为集合中的每个项目或数组的每个元素重复一段代码。

实例

<html>
<body>

<%
Dim cars(2)
cars(0)="Volvo"
cars(1)="Saab"
cars(2)="BMW"

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

</body>
</html>
显示示例 »

Do...Loop

如果您不知道要重复多少次,请使用 Do...Loop 语句。

Do...Loop 语句在条件为真时重复一段代码,或直到条件为真为止。

条件为真时重复代码

您使用 While 关键字检查 Do...Loop 语句中的条件。

Do While i>10
  some code
Loop

如果 i 等于 9,则上面循环中的代码将永远不会被执行。

Do
  some code
Loop While i>10

即使 i小于10,循环内的代码也会至少执行一次。

重复代码直到条件成立

您使用 Until 关键字检查 Do...Loop 语句中的条件。

Do Until i=10
  some code
Loop

如果 i 等于 10,则循环内的代码永远不会被执行。

Do
  some code
Loop Until i=10

即使 i 等于 10,此循环内的代码也会至少执行一次。

Exit Do...循环

您可以使用 Exit Do 关键字退出 Do...Loop 语句。

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

只要 i 不等于10,只要 i 大于10,就会执行这个循环内的代码。


更多实例

循环头文件
如何遍历html中的六个标题。

Do...While 循环
如何制作一个简单的 Do...While 循环。