「與」條件評估，即使以前的狀態是虛假的，VBA

Question

例如：

Dim name As String: name = "NaN" 

' Doesn't generate an error: 
If IsNumeric(name) Then 
    Dim iv As Integer: iv = CInt(name) 
    If iv > 0 Then 
     ' Do something 
    End If 
End If 

' Does generate error 13 on 'CInt(name)': Types don't match 
If IsNumeric(name) And CInt(name) > 0 Then 
    ' Do something 
End If 

爲什麼第二個條件CInt(name) > 0即使單if語句評價？或者這正是VBA所做的事情？我習慣於編寫沒有這種行爲的C＃代碼。

Answer 1

或者這正是VBA所做的？

是。

使用這個代替：

If IsNumeric(name) Then 
    If CInt(name) > 0 Then 
     ' Do something 
    End If 
End If 

或由amdixon鏈接的post任何其他方法。