1. WIKI教程
2. 学习VBA
3. switch statement

switch statement

当用户想要根据Expression的值执行一组语句时，则使用Switch Case。 每个值称为Case，并根据每种情况打开变量。 如果测试表达式与用户指定的任何Case不匹配，则执行Case Else语句。

Case Else是Select Case中的可选语句，但是，总是有一个Case Else语句是一个很好的编程习惯。

语法 (Syntax)

以下是VBScript中的Switch语句的语法。

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

例子 (Example)

出于演示目的，让我们在函数的帮助下找到整数的类型。

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