Imports System Imports Microsoft.VisualBasic Module MainClass Sub Main( ) Dim value As String Dim number As Decimal value = "-9999999999999999" If Decimal.TryParse(value, number) Console.WriteLine(number) Else Console.WriteLine("Unable to parse '{0}'.", value) End If End Sub End Module