VBA - 如果 Elseif - Else 語句

If 語句後跟一個或多個 ElseIf 語句，其中包含布林表示式，然後後跟一個預設 else 語句（在所有條件變為假時執行）。

語法

以下是 VBScript 中 If Elseif - Else 語句的語法。

If(boolean_expression) Then
   Statement 1
   .....
   .....
   Statement n
ElseIf (boolean_expression) Then
   Statement 1
   .....
   ....
   Statement n
ElseIf (boolean_expression) Then
   Statement 1
   .....
   ....
   Statement n
Else
   Statement 1
   .....
   ....
   Statement n
End If

流程圖

示例

為了進行演示，我們用一個函式來查詢 Excel 中兩個數字之間的最大值。

Private Sub if_demo_Click()
   Dim x As Integer
   Dim y As Integer
    
   x = 234
   y = 234
    
   If x > y Then
      MsgBox "X is Greater than Y"
   ElseIf y > x Then
      Msgbox "Y is Greater than X"
   Else
      Msgbox "X and Y are EQUAL"
   End If
End Sub

執行以上程式碼後，會產生以下結果。

X and Y are EQUAL