ASP入门基础教程-单条件选择结构

【 tulaoshi.com - Web开发 】

　　单条件选择结构是最常用的双分支选择结构，其特点是：所给定条件（条件表达式）的值如果为真，则执行x1块，否则，就执行x2块。

　　1、行 If 语句

　　其语法格式为：

if条件 then [ 语句1 ][Else 语句2 ]

　　简单实例：

htmlheadtitleMsgbox（）函数的应用/title/headbodyscript language="VBScript" for="button1" event="onClick"dim myWeek,amyWeek=WeekDay(Now)-1if myWeek=0 then a="要好好休息哟。" else a="努力工作呀！"msgbox "今天是星期" & myWeek & "," & a/scriptcenterinput type="button" name="button1" value="请查看今天是星期几"/center/html

　　说明：

当程序运行到 If 语句时，首先测试变量 myWeek 是不是为零，如果为零，则执行 Then 后的语句（a="要好好休息哟。"),否则执行 Else 后的子句（a="要努力工作呀！"）。 在执行完 Then 或 Else 之后的语句的，会从 End If 之后的语句继续执行。 Else 子句是可选的。 可以在（语句1或语句2中使用冒号（：）将多个命令组合成一条语句。

　　2、块 If 语句

　　虽然行If语句使用方便，可以满足许多选择结构程序设计的需要，但是当 Then 部分和 Else 部分包含较多内容时，在一行中就难以容纳所有命令。为此，VBScript 提供了块 If 语句，将一个选择结构用多个语句行来实现。块 If 语句又称多行 If 语句，其语法结构为：

　　　　if 条件 Then　　　　　　[语句列1]　　　　[Else　　　　　　[语句列2]]　　　　End if

　　简单实例：

htmlheadtitle块If语句的应用/title/headbodyscript language="VBScript" for="button1" event="onClick"dim a,ba=Text1.valueif Not IsNumeric(a) thenMsgbox "您输入的不是数值数据"Elseb="您输入的数据是：" & a &",它的平方根是：" & sqr(a)Msgbox b,,"求一个数的平方根"End if/scriptcenter请输入数值数据：input type="text" name="text1" size="10"input type="button" name="button1" value="求一个数的平方根"/center/html

　　3、If语句的嵌套

　　If 语句可以嵌套使用，即在If 语句的操作块(语句列1 或语句列2 ）中使用If语句。

　　简单实例：铁路托运行李，从甲地到乙地，规定每张客标托运费计算方法是:行李重量不超过50公斤时，每公斤0.5元，超过50公斤超过100公斤时，其超过部分每公斤1.5元，超过100公斤时，其超过部分每公斤2元。请计算并输出托运的费用。

　　分析：设行李重量为W公斤，应付运费为X元，则运费公式为：

　　当W =50 时，则 X=0.5*W

　　当 50 W =100 时，则 X=05*50+1.5*（W-50）

　　当 W 100 时，则X=0.5*50+1.5*50+（W-100）

htmlheadtitle托运费计算/title/headbody请输入行李重量：input name="text2" TYPE="TEXT" size="10" kg  input type="button" name="button3" value="计算运费"script language="VBScript" for="button3" event="onClick"w=text2.valueif not isNumeric(w) thenmsgbox "您输入的不是数值数据"elseif w =50 thenx=0.5 * welseif w=100 thenx=0.5*50+1.5*(w-50)elsex=0.5*50+1.5*50+2*(w-100)end ifend ifMsgbox "行李的托运费是："& x & "元",,"计算行李费"end if/script/body/html