Module Example
Public Sub Main()
Dim value As Double = -4.9999-305
Dim fromLiteral As Double = -4.9999-305
Dim fromVariable As Double = value
Dim fromParse As Double = Double.Parse("-4.9999-305")
Console.WriteLine("Double value from literal: {0,29:R}", fromLiteral)
Console.WriteLine("Double value from variable: {0,28:R}", fromVariable)
Console.WriteLine("Double value from Parse method: {0,24:R}", fromParse)
End Sub
End Module