VBA嵌套if語句

if 或 elseif 語句中嵌套另一個 if 或 elseif 語句。if 語句基於最外層 if 語句執行。這使得VBScript 來處理複雜的條件更容易。

語法:

VBScript中的嵌套 if 語句的語法是:

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

示例

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

Private Sub nested_if_demo_Click() Dim a As Integer a = 23 If a > 0 Then MsgBox "The Number is a POSITIVE Number" If a = 1 Then MsgBox "The Number is Neither Prime NOR Composite" ElseIf a = 2 Then MsgBox "The Number is the Only Even Prime Number" ElseIf a = 3 Then MsgBox "The Number is the Least Odd Prime Number" Else MsgBox "The Number is NOT 0,1,2 or 3" End If ElseIf a < 0 Then MsgBox "The Number is a NEGATIVE Number" Else MsgBox "The Number is ZERO" End If End Sub

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

The Number is a POSITIVE Number
The Number is NOT 0,1,2 or 3