VBA if...elseif...else語句

一個If語句，后面可以跟一個或多個由布爾表達式組成的elseif語句，然后是一個默認的else語句，當所有條件變為false時執行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 = 10
   y = 10

   If x > y Then
      MsgBox ("X 大於 Y 的值")
   ElseIf y > x Then
      MsgBox ("Y 大於 X 的值")
   Else
      MsgBox ("X 和 Y 的值相等")
   End If
End Sub

執行上面示例代碼，得到以下結果