1.if.....then
例:
<%
dim age
age=18
if age<20 then response.write("你未满20周岁,还没有投票权")
if age>=20 then response.write("请记得去投下你神圣的一票哦!!")
%>
2.if then.....end if
例:
<%
dim age
age=18
if age<20 then response.write("你未满20周岁,还没有投票权")
response.write("<br>")
response.write("但是别忘记请家里的大人去投票哦!")
end if
if age>=20 then response.write("请记得去投下你神圣的一票哦!")
%>
3.if then.....else.....endif
例:
<%
dim age
age=24
if age<20 then response("你未满20岁,还没有投票权")
else
response.write("请您投下您神圣的一票!")
end if
%>
4.嵌套条件选择
例:
<%
dim studytime
studytime=3
if studytime=0 then response.write("都不在读书,这样会不会太混了!")
else
if studytime=1 then response.write("为了前途,还是在加油吧!")
else
if studytime=2 then response.write("还不错哦,继续保持下去哦!")
else
if studytime=3 then response.write("你真是个用工的好学生!")
else
response.write("这么用工,真是国家未来的栋梁!")
endif
endif
endif
endif
%>
在VBScript中,也有一种简略的写法:上面的一段代码可以写成下面的代码:
<%
dim studytime
studytime=3
if studytime=0 then response.write("都不在读书,这样会不会太混了!")
elseif studytime=1 then response.write("为了前途,还是在加油吧!")
elseif studytime=2 then response.write("还不错哦,继续保持下去哦!")
elseif studytime=3 then response.write("你真是个用工的好学生!")
else response.write("这么用工,真是国家未来的栋梁!")
endif
%>
5.select case.....end select
语法:select case 变量名称
case 条件值1
执行语句1
case 条件值2
执行语句2
.....
case else
执行语句N
end select
例如:
<%
dim num
num=4
select case num
case 1
response.write("一元复始")
case 2
response.write("双星报喜")
case 3
response.write("三阳开泰")
case 4
response.write("事事如意")
case 5
response.write("五福临门")
case 6
response.write("六六大顺")
case else
response.write("输入错误,说不出吉祥话")
end select
%>
6.for......next
例如:
<%
dim num, total
total=0
num=100
for i=1 to mun step 2
total=total+i
next
response.write(""&num&"内的所有奇数的和是"&total)
%>
注:exit for的应用,强制从程序中跳出
例:
<%
dim num
for i=1 to 200
response.write("今天是个不错的天气!")
if i>150
exit for
end if
next
%>
7.while.....wend
例:
<%
dim num,total,i
totle=0
num=88
i=1
while i<=num
if i mod 6 <> 0 then total=total+i
i=i+1
wend
response.write("1到"&num&"的所有不能被6整除的数字总和为"&total)
%>
8.do.....loop
do.....loop的形势归纳起来有四种形势:
1>.do while.....loop
语法:do while 条件式
.....
程序代码
.....
loop
注:先判断,后执行。
2>.do.....loop while
语法:do
.....
程序代码
.....
loop while 条件式
注:先执行,后判断。
3>.do until.....loop
语法:do until 条件式
.....
程序代码
.....
loop
注:在条件式不成立的情况下会执行下面的程序。
4>.do.....loop until
语法:do
.....
程序代码
.....
loop until 条件式
注:在条件式不成立的情况下会结束程序的执行。
exit do的应用与exit for相似,也是强调结束do...loop循环的执行,继续执行下面的程序。
语法:
do while 条件式一
.....
程序代码
if 条件式二 then exit do
.....
loop
注:若条件式二成立,程序就会被终止。
Written on 2008年12月10日 @ 01:22 | by houlihu237 | Tags: VBScript
◎欢迎参与讨论,请在这里发表您的看法、交流您的观点。
0 Response to “VBScript中的循环及对策”