循环是指在指定情况下，多次重复执行一组语句。最常用(for …next、 do …loop)，

1、重复执行的语句叫循环语句。

循环语句可以分为三种类型：

(1)、当条件不为假之前的时候重复执行语句。

(2)、当条件变为真之前重复执行语句。

(3)、按指定的次数重复执行语句。

2、For…Next 循环 如果重复操作的次数固定，使用 For…Next 循环是一个很好的选择，此外也将介绍语法很类似的 For Each…Next循环，它适用在数组或集合的重复循环，(一)For…Next 在 For…Next 循环的语法中使用初值、终值、步长以及循环变量来完成重复计数的工作。当进入循 环第 一次执行时，循环变量便由初值开始累加一次步长，一直到等于或超过终值为止。

例如:

初值为1，终 值为 10， 步长为 2，

则循环将执行 5 次，

循环变量的值分别是 1、3、5、7、9，

第六次因循环变量累加到 11， 已经超过 10 了，便不再执行循环。

3、For…Next 循环的语法如下：

For 循环变量=初值 To 终值 Step 步长

程序语句…

[ Exit For]

程序语句…

Next

说明：

(1)、循环变量：这个变量通常是使用整数，但是必要时也可以是其他数值类型,他是一个数值变量。

(2)、初值：这是循环变量的初始值，为数值类型。其值不一定是整数, 或小数,VB会自动给他取整数

(3)、终值：循环变量的终值，为数值类型。 其值不一定是整数, 或小数,VB会自动给他取整数

(4)、步长：循环变量每次的增加量，步长的数值类型应该和循环变量一样, 其值可以是正数(递增循环)或是负数(递减循环),当不能为0,如果没有特别指定，则步 长默 认为 1。

(5)、循环体:在For语句和Next语句之间的语句,可以是一个或多个语句.

(6)、Next:是循环终端语句,在Next后面的"循环变量"与For语句中的"循环变量"必须相同.

如:for i=0 to 10 Step 1

......

Next

执行过程:

(1)、把初值1赋给循环变量i

(2)、将i的值与终值10进行比较,若i>10,则跳出循环,执行(5),否则执行循环体.

(3)、i增加一个步长值,即i=i+1

(4)、返回(2)继续执行

(5)、执行Next语句后面的代码

这个循环的作用是：根据 FOR 语句中所的初值、终值和步长，来确定循环次数，反复执行循环体内各语句。For…Next 循环尊循"先检查、后执行"的原则，即先检查循环变量是否超过终值，

然后决定是否执行循环体。因此，在下列情况下，循环体将不会执行，

(1)、当步长这正数,初值大于终值

(2)、当步长这负数,初值小于终值

当初值等于终值时,不管步长是正数还是负数,都执行一次循环.

For语句和Next语句必须成对出现,不能单独使用,并且For语句必须在Next语句之前.

循环次数N 的一般公式为：

N=Int((终值-初值)/步长)+1

For…Next循环中的初值小于终值时，步长必须为正值，表示由小到大计数;若初值大于终值时，步长必须设为负值，表示由大到小计数。

例如：初值小于终值时

代码如下:

<%

for i=0 to 10 Step 1 '默认步长为1可以不写

Response.Write(i&"

")

Next

%>

例如：初值大于终值时

代码如下:

<%

for i=10 to 1 Step -1

Response.Write(i&"

")

Next

%>

当步长大于0时：当初值<=终值时，For…Next之间的语句会被执行一次，接着循环变量会被加上步长，如果还小于终值，则再执行一次For…Next之间的语句，一直到循环变量累加到大于终值，才会跳离For…Next循环。

代码如下:

<%

for i=1 to 1 Step 0.5

Response.Write(i&"

")

Next

%>

当步长小于0时：当初值>=终值，会执行循环内的语句一次，然后循环变量减去步长(负的)，如果循环变量还>=终值，则再执行一次循环内的语句，一直到循环变量累加到小于终值，才会跳离For…Next循环。

循环语句的执行过程：

代码如下:

<%

for i=2 to 1 Step -1

Response.Write(i&"

")

Next

%>

4、循环语句的执行过程：

(1)通过For语句进入循环。如果循环变量的初值、终值、步长为算术表达式，系统首先计算出算术表达式的值，然后将初值赋给循环变量，并将终值、步长的值存入内存

(2)将循环变量的值与终值进行比较，当循环变量的值未超过终值的范围时，则顺次执行循环体内的各个语句。若循环变量的值超过终值的范围，则退出循环，执行NEXT的后继语句。

(3)在执行完循环体各语句后遇到NEXT语句，将循环变量增加一个步长的值，再去终值，比较，如果仍不超过　起开涠，则再次执行循环体内的各语句，这样重复执行，直到循环变量的值超过终值的范围，结束该循环，执行Next的后继语句。

课堂例题:

【例 1】

简单1加到10,用循环特点每次加1

代码如下:

<%

for i=0 to 10

sum=sum+i

Next

Response.Write(sum)

%>

最终显示结果:55

【例 2】

代码如下:

<%

for i=0 to 10 step 2

Response.Write(i&"

")

Next

%>

最终显示结果:0,2.4,6,8,10

【例 3】

代码如下:

<%

for i=0 to 10

Response.Write(i&"

")

if i=5 then

exit for'强制结束循环

end if

Next

%>

在上述程序中，原本 i 会从1 累加到10，执行 10次，但是在 i 累加到 5 时，符合了 i=5 的判断式，结

果执行 Exit For 语句，跳离了循环，因此最后网页显示的结果是“0,1,2,3,4,5,”

【例 4】

代码如下:

<%

for i=10 to 0 step -1

sum=sum+i

Next

Response.Write(sum)

%>

最终显示结果:55

5、我们以范例来说明 For…Next循环的不同用法：

【例 1】

代码如下:

<% For i=1 To 10

Response.write i&","

Next

%>

上列程序会累加上 I，而循环中的 i 会由1,2，3，…每次累加 1，一直到 10，总共执行 10 次，最后网页会显示出“1,2，3,4，5,6，7,8，9,10， ”

【例 2】

代码如下:

<%

For a=1 To 10 Step 0.5

Response.write a&","

Next

%>

上列程序中 a将每次累加 0.5，总共执行 20 次，最后在网页中，显示出“1，1.5，2，2.5，3，3.5…

9.5，

【例 3】

代码如下:

<%

For j=10 To 1 Step -1

Response.write j&","

Next

%>

上列程序中j 将由 10到 1，每次累减 1，最后在网页中，显示出“10，9，8，7，6，5，4，3，2，1， ”

【例 4】

循环中的初值、终值和步长，在程序一开始执行时只读入一次，随后即使在循环内更改其值，也不会对循环执行有所影响。

代码如下:

<%

StepNum=1

EndNum=1

For i=1 To endNum Step stepNum

Response.write i&","

StepNum=StepNum-0.1

EndNum=EndNum+1

Next

%>

上列程序中，故意在循环内将步长每次减少 0.1，将终值每次都加 1，意图使 i 永远达不到终值，但是因为步长和终值都只读取一次，便不会再更改，因此这段程序的输出结果还是“1” 。

【例 5】

循环中的循环变量，是会在循环中更动的，因此：

代码如下:

<%

For k=1 To 10

Response.Write k&","

Next

%>

上列程序会累加上 k，而循环中的 k 会由1,2，3，…每次累加 1，一直到 10，总共执行 10 次，最后网页会显

示出“1,2，3,4，5,6，7,8，9,10，

更多信息请查看IT技术专栏