Written on 2008年12月10日 @ 01:22 | by houlihu237 | Tags: VBScript  

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
注:若条件式二成立,程序就会被终止。

相关文章:

VBScript的运算  (2008-12-10 0:21:19)

VBScript变量的使用  (2008-12-9 23:21:42)

  1. 0 Response to “VBScript中的循环及对策”

Post a Comment

◎欢迎参与讨论,请在这里发表您的看法、交流您的观点。

About Me

成功的定义就是:每天在各方面持续不断地进步一点点.
欢迎有共同爱好的朋友相互交流。 邮箱:houlihu237@126.com
QQ:383153740 手机:13750888314

Find entries :
实用电子书籍 小学教育光盘
图像处理教程 淘宝相关服务
淘宝店铺装修 网络营销推广
图像图像设计 其他相关服务