非常教程

VBScript 教程教程

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 循环语句

更多实例(仅适用于 IE)

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

Do...While loop
如何做一个简单的 Do...While 循环。


VBScript 循环语句
VBScript 教程

VBScript,即 Visual Basic Script,是微软公司开发的一种解析型的服务端(也支持客户端)脚本语言,可以看作是 VB 语言的简化版。

VBScript 教程目录

1.VBScript 教程
2.VBScript 变量
3.VBScript 用法
4.VBScript 实例
5.VBScript DateSerial 函数
6.VBScript DatePart 函数
7.VBScript DateDiff 函数
8.VBScript DateAdd 函数
9.VBScript Date 函数
10.VBScript CDate 函数
11.VBScript 总结
12.VBScript 循环语句
13.VBScript 条件语句
14.VBScript 程序
15.VBScript Hour 函数
16.VBScript FormatDateTime 函数
17.VBScript Day 函数
18.VBScript DateValue 函数
19.VBScript TimeValue 函数
20.VBScript TimeSerial 函数
21.VBScript Timer 函数
22.VBScript Time 函数
23.VBScript Second 函数
24.VBScript Now 函数
25.VBScript MonthName 函数
26.VBScript Month 函数
27.VBScript Minute 函数
28.VBScript IsDate 函数
29.VBScript CInt 函数
30.VBScript Chr 函数
31.VBScript CDbl 函数
32.VBScript CCur 函数
33.VBScript CByte 函数
34.VBScript CBool 函数
35.VBScript Asc 函数
36.VBScript Year 函数
37.VBScript WeekdayName 函数
38.VBScript Weekday 函数
39.VBScript Atn 函数
40.VBScript Abs 函数
41.VBScript FormatPercent 函数
42.VBScript FormatNumber 函数
43.VBScript FormatCurrency 函数
44.VBScript Oct 函数
45.VBScript Hex 函数
46.VBScript CStr 函数
47.VBScript CSng 函数
48.VBScript CLng 函数
49.VBScript Tan 函数
50.VBScript Sqr 函数
51.VBScript Sin 函数
52.VBScript Sgn 函数
53.VBScript Rnd 函数
54.VBScript Log 函数
55.VBScript Fix 函数
56.VBScript Int 函数
57.VBScript Exp 函数
58.VBScript Cos 函数
59.VBScript UBound 函数
60.VBScript Split 函数
61.VBScript LBound 函数
62.VBScript Join 函数
63.VBScript IsArray 函数
64.VBScript Filter 函数
65.VBScript Array 函数
66.VBScript Replace 函数
67.VBScript Mid 函数
68.VBScript Trim 函数
69.VBScript RTrim 函数
70.VBScript LTrim 函数
71.VBScript Len 函数
72.VBScript Left 函数
73.VBScript LCase 函数
74.VBScript InStrRev 函数
75.VBScript InStr 函数
76.VBScript UCase 函数
77.VBScript StrReverse 函数
78.VBScript String 函数
79.VBScript StrComp 函数
80.VBScript Space 函数
81.VBScript Right 函数
82.VBScript GetRef 函数
83.VBScript GetObject 函数
84.VBScript GetLocale 函数
85.VBScript Eval 函数
86.VBScript CreateObject 函数
87.VBScript ScriptEngine, ScriptEngineBuildVersion, ScriptEngineMajorVersion, ScriptEngineMinorVersion 函数
88.VBScript Round 函数
89.VBScript RGB 函数
90.VBScript MsgBox 函数
91.VBScript LoadPicture 函数
92.VBScript IsObject 函数
93.VBScript IsNumeric 函数
94.VBScript IsNull 函数
95.VBScript IsEmpty 函数
96.VBScript InputBox 函数
97.VBScript 关键字
98.VBScript 函数
99.VBScript VarType 函数
100.VBScript TypeName 函数