文章

vbs循环

vbs循环

在 VBScript 中,我们可以使用四种循环语句: For…Next 语句 - 运行一段代码指定的次数 For Each…Next 语句 - 针对集合中的每个项目或者数组中的每个元素来运行某段代码 Do…Loop 语句 - 运行循环,当条件为 true 或者直到条件为 true 时

For…Next 循环

我们可以使用一个计数器变量,这个变量会随着每次循环递增或递减,例如这样:

1
2
3
For i=1 to 10
  some code
Next

Step 关键词

通过使用 Step 关键词,我们可以规定计数变量递增或递减的步进值。 在下面的例子中,计数变量i每次循环的递增步进值为 2。

1
2
3
For i=2 To 10 Step 2
  some code
Next

如果要递减计数变量,就必须负的步进值。并且需要规定小于开始值的结束值。 在下面的例子中,计数变量i每次循环的递减步进值为 2。

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

exit for

您可以通过 Exit For 关键词退出 For…Next 语句。

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

For Each…Next

类似于python中的

1
2
3
x = [1,2,3]
for i in x:
  print i

vbs版本

1
2
3
4
5
6
Dim cars(2)
cars(0)="Volvo"
cars(1)="Saab"
cars(2)="BMW"
For Each x In cars
  msgbox x

Do…Loop

Do…Loop 语句重复执行某段代码直到条件是 true 或条件变成 true。

while

您可以使用 While 关键字来检查 Do… Loop 语句的条件。

1
2
3
Do While i>10
some code
Loop

类似c语言do while 这个循环内的代码将被执行至少一次,即使 i 小于 10。

1
2
3
Do
some code
Loop While i>10

until

您可以使用 Until 关键字来检查 Do…Loop 语句的条件。

1
2
3
Do Until i=10
some code
Loop

如果 i 等于 10,上述循环内的代码将终止执行。

1
2
3
Do
some code
Loop Until i=10

这个循环内的代码将被执行至少一次,即使 i 等于 10。

退出 Exit Do

1
2
3
4
Do Until i=10
i=i-1
If i<10 Then Exit Do
Loop
本文由作者按照 CC BY 4.0 进行授权