Public Class Tester Public Shared Sub Main Dim dblNum As Double = 2123.456 Console.WriteLine(dblNum.ToString("#,###.###000")) End Sub End Class