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