如果整數/雙重強制轉換失敗，默認爲0的最佳方法是什麼？

Question

我不喜歡我每次使用CInt或Integer.Parse（我知道的是昂貴的）時間做這樣的事情：

Try 
    someIntVariable = CInt(someStringVariable) 
Catch ex As Exception 
    someIntVariable = 0 
End Try 

而且我不喜歡參與Integer.TryParse的所有代碼行。我想我可以創建一個具有類似的功能：

Function ToInteger(str As String) As Integer 
    Dim number As Integer 
    Int32.TryParse(str, number) 
    Return number 
End Function 

但不是已經有一個擴展方法或東西內置到.NET可以在一個更優雅的方式做到這一點對我來說（沿行Nullable(Of T).GetValueOrDefault）？

Answer 1

老實說Integer.TryParse是要走的路，但是如果你不喜歡語法，你可以將它隱藏在擴展方法的後面。

Public Module IntegerExtensions 
    <Extension()> _ 
    Public Function AsIntOrDefault(ByVal valueToParse As String, Optional ByVal defaultValue As Integer = 0) As Integer 
     Dim retVal As Integer = 0 

     If Not Integer.TryParse(valueToParse, retVal) Then 
      retVal = defaultValue 
     End If 

     Return retVal 
    End Function 
End Module 

然後可以使用這樣的：

Public Class Foo 
    Public Sub Blah() 
     Dim value1 As Integer = "IWillNotParse".AsIntOrDefault() 'Should be 0 
     Dim value2 As Integer = "IWillNotParse".AsIntOrDefault(5) 'Should be 5 
     Dim value3 As Integer = "123".AsIntOrDefault() 'Should be 123 
    End Sub 
End Class 

Answer 2

試用Integer.TryParse(String, Integer)

你傳遞你想解析字符串，和整數要存儲的結果。

TryParse返回一個布爾用解析是成功還是失敗。所以你可以做

If Not Integer.TryParse(myNonInt, DestinationInt) 
    DestinationInt = 0 
End If 

如果解析成功，該值自動存儲在DestinationInt。

Answer 3

如果你不需要，你不應該使用try/catch。拋出異常涉及很多開銷。

相反，你可以簡單地使用此代碼（如果沒有/結束，如果語句）

Dim value As Integer = 0 
Int32.TryParse(stringValue, value) 

如果字符串語法分析，那麼你將有值，否則爲0

Answer 4

這也許能爲你工作..

Function ToInteger(str As String) As Integer 
    Dim number As Integer 
    If IsNumeric(str) Then 
     number = CInt(str) 
    Else 
     number = 0 
    End If 
    Return number 
End Function