Format Double value with N
Imports System.Globalization Module Example Sub Main() Dim floating As Double = 10761.937554 Dim ci As New CultureInfo("en-us") Console.WriteLine("N: {0}", floating.ToString("N03", ci)) ' Displays "N: 10,761.938" End Sub End Module