문자열을 기본값 인 double로 변환하십시오.

Question

네이티브 메소드를 사용하여 문자열을 기본값으로 두 배로 변환하는 방법은 무엇입니까?

이와 비슷한?

dim value as double 
dim text 

value = Double.TryParse(text, 0) 

Answer 1

이 한 줄에 그것을 수행해야합니다

Dim value as Double 
Dim text="23.675" 

If Not Double.TryParse(text, value) Then value = 4 
'At this point value contains either the parsed value of text 
'or 4 if text couldn't be parsed into a double 

문서 : http://msdn.microsoft.com/en-us/library/994c0zb1(v=vs.110).aspx

당신은 물론 기본 값으로이 작업을 수행하는 방법을 만들 수 :

Public Function TryParseDoubleDefault(text as String, defaultValue as Double) As Double 
    Dim parsedValue As Double 
    If Not Double.TryParse(text, parsedValue) Then parsedValue = defaultValue 
    Return parsedValue 
End Function 

그리고 너 당신이 확장 쓰기, 그것을 많이 필요한 경우

value = Double.TryParseDefault(text, 4) 

Answer 2

Dim text As String = "123.45" 
Dim value As Double 
If Double.TryParse(text, value) Then 
    ' text is convertible to Double, and value contains the Double value now 
Else 
    ' Cannot convert text to Double set the default value here 
End If