多分支选择结构的特点是：从多个选择结构中，选择第一个条件为真的路线作为执行的线路。即所给定的选择条件为真时，就执行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入门基础"教程>>>>> (责任编辑：admin) |
