Double ToString("#####")
Module Example Public Sub Main() Dim value As Double value = 123 Console.WriteLine(value.ToString("#####")) End Sub End Module