Imports System
Imports System.Globalization
Class Sample
Public Shared Sub Main()
Dim result As Boolean
Dim doubleVal As [Double]
' Double
result = [Double].TryParse("-7", NumberStyles.Float Or NumberStyles.AllowThousands, Nothing, doubleVal)
Console.WriteLine(doubleVal.ToString())
End Sub
End Class