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