关于VB里判断逻辑的一个说明

Option Explicit

Private Sub Command1_Click()
    Print "连续判断------------------------"
    If funcA And funcB And funcC Then
        Print ">>> OK" & vbCrLf
    Else
        Print ">>> NO" & vbCrLf
    End If
    
    Print "嵌套判断------------------------"
    If funcA Then
        If funcB Then
            If funcC Then
                Print ">>> OK" & vbCrLf
                Exit Sub
            End If
        End If
    End If
    Print ">>> NO" & vbCrLf
    
    Print "IIF 判断------------------------"
    If IIf(funcB, funcC, funcA) Then
        Print ">>> OK" & vbCrLf
    Else
        Print ">>> NO" & vbCrLf
    End If
End Sub

Private Function funcA() As Boolean
    Print "运行过 funcA"
    funcA = False
End Function
Private Function funcB() As Boolean
    Print "运行过 funcB"
    funcB = True
End Function
Private Function funcC() As Boolean
    Print "运行过 funcC"
    funcC = True
End Function