for 计数器=起始值to 结束值[step 递增值]
程序代码叙述
next [计数器]

循环执行时,要先设定计数器的初始值、结束值与执行一次的递增值为多少。当我们开始执行for...next 循环时,不管当作计数器的变量其值原来为何,都会重新被填入初始值;当循环执行到next 时,计数器会被先加上递增值,然后再检查是否超过结束值;如果没有超过结束值则继续执行循环,超过结束值则跳出循环。我们看看下面的程序代码:
<html>
<%
dim shtloop as short=cshort(request("loop"))
for shtcount=1 to shtloop step 1
response.write("循环执行" & cstr(shtcount) & "次<br>")
next shtcount
response.write("循环结束后计数器的值为" & cstr(shtcount))
%>
</html>

上述范例码利用request 对象输入循环所要执行次数至变量shtloop 中,当作是循环的结束值;然后指定计数器shtcount 的初始值为1,并且指定执行完一次循环所的递增值为一。我们假设使用者所输入的loop 参数为2,所以循环执行完第一次时,遇到next 叙述将计数器递增1,并检查是否超过结束值;此时2 并没有超过结束值,所以在跳进循环中继续执行程序,遇到next叙述又将计数器递增1,并检查是否超过结束值。此时计数加1 后的值为3 超过结束值,所以便跳出循环。这里要注意的是跳出循环时,计数器的值总是比结束值多了递增值。另外如果递增值为1,那么step 1 的叙述可以省略。
巢状for...next 循环
for...next 循环也可以写成巢状结构,如下所示:
for 计数器1=起始值to 结束值[step 递增值]
for 计数器2=起始值to 结束值[step 递增值]
程序代码叙述
next [计数器1]
next [计数器2]
这种巢状的for...next 循环执行时先设定外层的条件,然后跳进内层回圈内执行内层循环。待内层循环执行超过结束值后,便跳至外层循环的next 叙述,将外
| 对此文章发表了评论 |

