PART THREE VB选择语句

我们认识了 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>

</head>

<body>

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. 运行效果

PART THREE VB选择语句

猜你在找的VB相关文章