我们认识了 inputbox 和 msgbox ,能够实现网页和用户的对话,并能实现二个数的相加结果显示。我们常说程序的出现是为了解决现实生活中的问题,可现实的问题不可能都是 1+1=2 般的简单,我们有时候会面对不同选择,选择不同,结果不同。
例如:考试成绩在 90 分以上者,可获得奖学金 100 元,成绩在 80 分以上者可获得 50 元,否则没有奖学金。
1. 实现过程
如果成绩在 90 分以上,获奖学金 100 元
如果成绩在 80 分以上,获奖学金 50 元
否则,没有奖学金
在 VB 脚本语言中,有两种条件语句,来实现判断
( 1 ) if 语句,结构有以下几种形式
1>If…then…end if
如果 … 则 … 结束;在 if (如果)的后面跟上的是条件, then (则)后面跟上的是满足 if 条件则执行的语句
例:如果 成绩 >90 则 获奖学金 100 元 结束
2>If …then…else…end if
如果 … 则 … 否则 … 结束;在 if 的后面跟上的是条件, then 后面跟上的是满足 if 条件执行的语句, else( 否则 ) 后面跟上的是不满足条件执行的语句
例:如果 成绩 >80 则 获奖学金 50 否则 没有奖学金 结束
3>If…then…elseif…then…else…end if
如果 … 则 … 如果 ... 则 … 否则 … 结束;此语句运用于多个条件存在的情况。
例:如果 成绩 >90 则 获奖学金 100 元 如果 成绩 >80 则获奖学金 50 否则 没有奖学金 结束
( 2 ) select case 语句,其结构如下:
Select case 表达式
Case 结果 1
执行语句 1
Case 结果 2
执行语句 2
Case 结果 3
执行语句 3
End select
这种选择的语句,针对的是 select case 表达式的不同值,来进行不同的执行
例: select case 成绩
Case 大于 90
获奖学金 100 元
Case 80 到 90 之间
获奖学金 50 元
Case 其他情况
没有奖学金
End select 用以结束
2. 全代码
<html>
<head>
<title>VB 选择语句 </title>
</head>
<body>
<script language="vbscript">
dim chengji
chengji=inputbox(" 请输入成绩 "," 成绩输入 ")
if chengji>=90 then
msgbox(" 获得奖学金 100 元 ")
elseif chengji>=80 and chengji<90 then
msgbox(" 获得奖学金 50 元 ")
else
msgbox(" 没有奖学金 ")
end if
</script>
</body>
</html>
3. 运行效果