——————————————————————————————
不应该写
Private Function A(ByVal B As Integer) As Boolean
If B > 0 Then
Return True
Else
Return False
End If
End Function
而应该写
Private Function A(ByVal B As Integer) As Boolean
Return (B > 0)
End Function
——————————————————————————————
