加入收藏 | 设为首页 | 会员中心 | 我要投稿 宁德站长网 (https://www.0593zz.com/)- 科技、建站、经验、云计算、5G、大数据,站长网!
当前位置: 首页 > 站长学院 > Asp教程 > 正文

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

发布时间:2016-09-02 20:23:23 所属栏目:Asp教程 来源:站长网
导读:单条件选择结构是最常用的双分支选择结构,其特点是:所给定条件(条件表达式)的值如果为真,则执行x1块,否则,就执行x2块。 1、行 If 语句 其语法格式为: i
单条件选择结构是最常用的双分支选择结构,其特点是:所给定条件(条件表达式)的值如果为真,则执行x1块,否则,就执行x2块。

1、行 If 语句

其语法格式为:

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

简单实例:

<html>
<head>
<title>Msgbox()函数的应用</title>
</head>
<body>
<script language="VBScript" for="button1" event="onClick">
dim myWeek,a
myWeek=WeekDay(Now)-1
if myWeek=0 then a="要好好休息哟。" else a="努力工作呀!"
msgbox "今天是星期" & myWeek & "," & a
</script>
<center><input 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

简单实例:

<html>
<head>
<title>块If语句的应用</title>
</head>
<body>
<script language="VBScript" for="button1" event="onClick">
dim a,b
a=Text1.value
if Not IsNumeric(a) then
Msgbox "您输入的不是数值数据"
Else
b="您输入的数据是:" & a &",它的平方根是:" & sqr(a)
Msgbox b,,"求一个数的平方根"
End if
</script>
<center>请输入数值数据:<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)

<html>
<head><title>托运费计算</title></head>
<body>
请输入行李重量:<input name="text2" TYPE="TEXT" size="10">&nbsp;kg&nbsp;&nbsp;
<input type="button" name="button3" value="计算运费">
<script language="VBScript" for="button3" event="onClick">
w=text2.value
if not isNumeric(w) then
msgbox "您输入的不是数值数据"
else
if w <=50 then
x=0.5 * w
else
if w<=100 then
x=0.5*50+1.5*(w-50)
else
x=0.5*50+1.5*50+2*(w-100)
end if
end if
Msgbox "行李的托运费是:"& x & "元",,"计算行李费"
end if
</script>
</body>
</html>

查看全套ASP入门教程

(编辑:宁德站长网)

【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容!

    热点阅读