<%
Dim age
age = 35
Select Case age
Case Is< 18
Response.Write "青少年專區"
Case 18 To 30
Response.Write "青年專區"
Case 30 To 60
Response.Write "中年專區"
Case Else
Response.Write "老年專區"
End Select
%>
在上面的代碼中,我們首先定義了一個變量age,并將其賦值為35。然后使用語句將age與各個條件進行比較,并根據匹配的條件執行相應的代碼塊。因為age的值在條件“30 To 60”范圍內,所以輸出結果為“中年專區”。這個例子清晰地展示了使用語句來根據不同條件執行相應代碼塊的過程。
<%
Dim username
username = "admin"
Select Case username
Case "admin"
Response.Write "歡迎管理員"
Case "guest"
Response.Write "歡迎游客"
Case Else
Response.Write "歡迎訪問者"
End Select
%>