多分支选择结构的特点是:从多个选择结构中,选择第一个条件为真的路线作为执行的线路。即所给定的选择条件为真时,就执行A1块;如果为假则继续检查下一个条件。如果条件都为假,就执行其它操作块,如果没有其它操作块,则不作任何操作就结束选择。其语法结构如下:
Select Case <测试条件>
[Case <表达式1>
[ <语句列1> ]]
[Case <表达式2>
[ <语句列1> ]]
...
[Case Else
[ <其他语句列> ]]
End Select
简单实例1:
<html>
<head>
<title>If...then语句的使用</title>
<Script Language="VBScript">
<!--
Sub bchange(choice)
Select Case choice
case 1
document.bgcolor="#9AD3AF"
case 2
document.bgcolor="#F3FAC5"
case 3
document.bgcolor="#CDC8F7"
case 4
document.bgcolor="#F8C7DA"
case 5
document.fgcolor="#69011C"
case 6
document.fgcolor="#264436"
case 7
document.fgcolor="#D76817"
case 8
document.fgcolor="#544976"
End Select
End Sub
-->
</Script>
</head>
<body>
<center>
<h2>背景和文字颜色的选择</h2>
<p><table border=2>
<tr><th>背景颜色<th>选择<th>文字颜色<th>选择</tr>
<tr><td>淡绿<td><input type=radio onClick="bchange(1)"><td>深红<td><input type=radio onClick="bchange(5)"></tr>
<tr><td>淡黄<td><input type=radio onClick="bchange(2)"><td>深绿<td><input type=radio onClick="bchange(6)"></tr>
<tr><td>淡紫<td><input type=radio onClick="bchange(3)"><td>桔黄<td><input type=radio onClick="bchange(7)"></tr>
<tr><td>淡粉<td><input type=radio onClick="bchange(4)"><td>深蓝<td><input type=radio onClick="bchange(8)"></tr>
</table>
</center>
</body>
</html>
简单实例2:
<html>
<head>
<title>asp简单程序</title>
</head>
<body>
<%
dim aa,bb,cc,dd,ee,ff,my_time
my_time=time()
aa=#00:00:00#
bb=#07:00:00#
cc=#12:00:00#
dd=#14:00:00#
ee=#20:00:00#
ff=#23:59:59#
x=time()
select case true
case x>=aa and x<bb
response.write("早上好 ,欢迎你的光临 !")
case x>bb and x<cc
response.write(" 上午好,欢迎你的光临 !")
case x>cc and x<dd
response.write("中午好 ,欢迎你的光临 !")
case x>dd and x<ee
response.write("下午好 ,欢迎你的光临 !")
case x>ee and x<ff
response.write("晚上好 ,欢迎你的光临 !")
end select
%>
</body>
</html>
查看全套ASP入门教程