位置:首頁 > 高級語言 > VBA教學 > VBA switch語句

VBA switch語句

當一個用戶要執行一組根據表達式語句的值在使用select case。每個值被稱為 case,並且基於每一種情況下的變量被接通。case else語句執行,如果測試表達式不匹配任何由用戶指定的case。

case else為一個可選的聲明在使用 select case 時,始終有一個case else語句是一個良好的編程習慣。

語法:

在VBScript一個Swithc語句的語法是:

Select Case expression
   Case expressionlist1
      statement1
      statement2
      ....
      ....
      statement1n
   Case expressionlist2
      statement1
      statement2
      ....
      ....
   Case expressionlistn
      statement1
      statement2
      ....
      ....   
  Case Else
      elsestatement1
      elsestatement2
      ....
      ....
End Select

示例

為了演示的目的,找出整數類型在函數的幫助下完成。

Private Sub switch_demo_Click()
  Dim MyVar As Integer
  MyVar = 1
  
  Select Case MyVar
     Case 1
       MsgBox "The Number is the Least Composite Number"
     Case 2
       MsgBox "The Number is the only Even Prime Number"
     Case 3
       MsgBox "The Number is the Least Odd Prime Number"
     Case Else
       MsgBox "Unknown Number"
  End Select
End Sub

當執行上麵的代碼,它產生了以下結果:

The Number is the Least Composite Number