VBS基礎篇 - 條件語句(if與Select Case)

更新時間：2018年05月28日 23:33:53 作者：Ethon

經常地，當我們編寫代碼時，我們需要根據不同的判斷執(zhí)行不同操作，我們可以使用條件語句完成這個工作，asp中的條件語句主要是if與Select Case這里就為大家介紹一下,需要的朋友可以參考下

If...Then...Else

在下面的情況中，您可以使用 If...Then...Else 語句：

在條件為 true 時，執(zhí)行某段代碼

選擇兩段代碼之一來執(zhí)行時

dim a '定義一個變量
a = 100
if a < 200 then a = 300 '若i<200,則對i重新賦值
msgbox a '輸出的值為300

要運行多行代碼，必須使用多行（或塊）語法，多行（或塊）語法包含 End If 語句

dim a,b,c
a=inputbox("請輸入a的值：")
b=100
c=200
if a<200 then '條件為 True 時運行某一語句塊，條件為 False 時運行另一語句塊
  msgbox b
else
  msgbox c
end if

對多個條件進行判斷，可以添加任意多個 ElseIf 子句以提供多種選擇

dim a
a=inputbox("請輸入a的值：")
if a<200 then '條件為 True 時運行某一語句塊，條件為 False 時運行另一語句塊
  msgbox "執(zhí)行語句1"
elseif a=200 then 
  msgbox "執(zhí)行語句2"
elseif a>200 then
  msgbox "執(zhí)行語句3"
end if

Select Case結構提供了 If...Then...ElseIf結構的一個變通形式，可以從多個語句塊中選擇執(zhí)行其中的一個。Select Case語句提供的功能與 If...Then...Else語句類似，但是可以使代碼更加簡練易讀。

'Select Case 結構在其開始處使用一個只計算一次的簡單測試表達式。表達式的結果將與結構中每個 Case 的值比較，如果匹配，則執(zhí)行與該Case 關聯(lián)的語句塊。
dim a
a=inputbox("隨便填寫一個數")
a=int(a)
select case a 
  case 6,7,8,9 msgbox("還行")
  case 10,11,12,13,14,15 msgbox("一般")
  case 16,17,18,19,20 msgbox("可以了")
  case 21,22,23,24,25 msgbox("無敵了")
  case else msgbox("做夢呢")
end select

注意： Select Case結構只計算開始處的一個表達式（只計算一次），而 If...Then...ElseIf 結構計算每個 ElseIf 語句的表達式，這些表達式可以各不相同。僅當每個 ElseIf 語句計算的表達式都相同時，才可以使用 Select Case 結構代替If...Then...ElseIf 結構。

您可能感興趣的文章: