VB等效的測試一些返回值

Question

在C我能做到這一點的：

if(e=my_func()){ 
... 
} 

有一些相當於在VB？

Answer 1

相信相當於是這樣的：

e = my_func() 
If e Then 
    '... 

你還必須記住，VB具有隱含值轉換爲布爾類型不同的規則。

Answer 2

你需要一個函數返回一些東西。假設它是一個布爾值。

Function x() As Boolean 
    Return True 
End Function 

現在你可以檢查它像這樣：

If x() = True Then 
     'do something 
    End If 

或者更簡單地說：

If x() Then 
      'do something 
    End If 

下面是其他的可能性，只是要清楚。

Function x() As Integer 
    Return 5 
End Function 

If x() = 5 Then 
    'do something 
End If 

If Not (x() = 5) Then 
    'do something 
End If 

Dim y as Integer 
y = x() 

If y = 5 Then 
    'do something 
End If