while shtx<=shtloop
response.write("循环执行了:" & cstr(shtx) & "次<br>")
shtx+=1
end while
%>
</html>
do until...loop 循环
这种do until...loop 结构的循环,则是先判断条件判断式是否满足,才会跳入循环内执行。其语法如下:
do until 条件判断式
程序代码叙述
loop

do until...loop 循环在执行时,会先判断条件是否已经为true,倘若为false 则进入循环。循环内的程序叙述执行到loop 时,则表示跳回do until 叙述执行后面的条件判断式,倘若为false即跳入循环继续执行;倘若为true 则跳出循环,继续程序的执行,我们来观察下列的范例:
<html>
<%
dim shtloop as short=cshort(request("loop"))
dim shtx as short=1
do until shtx>shtloop
response.write("循环执行了:" & cstr(shtx) & "次<br>")
shtx+=1
loop
%>
</html>
无穷循环
在使用循环结构时,要撰写可以让程序跳出循环的程序叙述。也就是说要可以让循环判断式的结果核定为不继续执行循环。倘若循环中没有可以改变条件叙述之结果的程序,则永远无法跳出循环,这样的循环我们称为无穷循环。例如上面的do until...loop 循环,我们将改变shtx 的叙述shtx+=1 拿掉,这样的循环就变成无穷循环了,如下范例所示:
do until shtx>shtloop
response.write("循环执行了:" & cstr(shtx) & "次<br>")
loop
vb.net 提供了可以强迫跳出循环的叙述exit do,但是在条件叙述中如果可以指定跳出循环的叙述,则最好不要用exit do 叙述来强迫跳出循环。exit do 叙述在循环内利用if 判断式判断是否要跳出循环,用法如下范例:
if 条件叙述式then
exit do
end if
for...next 循环
当我们知道一段程序代码所要执行的条件以
| 对此文章发表了评论 |

