继上一篇我们学习了脚本语言 VBScript 的函数和条件语句后，今天我们继续来看看VBScript 中的循环语句。
循环语句的作用就是重复执行程序代码，循环可分为三类：一类在条件变为“假”之前重复执行语句，一类在条件变为“真”之前重复执行语句，另一类按照指定的次数重复执行语句。在VBScript 中可使用下列循环语句：
Do...Loop: 当（或直到）条件为“真”时循环。
While...Wend: 当条件为“真”时循环。
For...Next: 指定循环次数，使用计数器重复运行语句。
For Each...Next: 对于集合中的每项或数组中的每个元素，重复执行一组语句。 我们先来看看 Do...Loop，它是可以多次（次数不定）运行语句块。当条件为“真”时或条件变为“真”之前，重复执行语句块。请看下例：
< html> < head> < title>DoLoop.asp< /title>< body bgcolor="#FFFFFF">< /head>< p>< /p> < p> 请将今年到本月为止的每个月份的销售结算记录填写在本页之上。< P> < % counter = 1 thismonth = month(now()) Do while counter < thismonth + 1 response.write " " & counter & " 月份 : " response.write "______________________________" & "< BR>< br>" If counter >13 then exit do end if counter = counter+1 Loop %> < hr>< /body>< /html>
这段 ASP 程序运用循环语句制作了一张销售结算记录表，将以上代码剪贴至记事簿保存为 DoLoop.asp，并在浏览器中以 HTTP 方式进行浏览，根据当前的月份的不同，你将看到如下图的结果。
<img src='http://arch.pconline.com.cn/pcedu/empolder/wz/asp/10111/pic/2001124_asp_11.gif'>
我们来分析一下此段程序，我们的目的是要根据当前的月份打印一张表格，首先我们建立一个计数器“count”并将其值设为 1，然后我们用函数 month() 和 now() 得到当前的月份，最后建立循环，当 count 的值小于当前月份的值加 1 的时候，即显示月份值及一条横线并将 count 的值加 1，循环语句重复执行直到以上条件为假时退出循环。其中如果 count 大于 13 则用 exit do 立即退出循环。
Do Loop 语句还可以使用以下语法：
Do
[statements][Exit Do]
[statements]Loop [{While | Until} condition]
While...Wend 语句是为那些熟悉其用法的用户提供的。但是由于 While...Wend 缺少灵活性，所以建议最好使用 Do...Loop 语句。下面我们来看看 For Next 语句。For...Next 语句用于将语句块运行指定的次数，在循环中使用计数器变量，该变量的值随每一次循环增加或减少。