Double format: ToString("r",CultureInfo.CreateSpecificCulture("fr-FR"))
Imports System.Globalization Module Example Sub Main() Dim value As Double value = Math.Pi Console.WriteLine(value.ToString("r",CultureInfo.CreateSpecificCulture("fr-FR"))) End Sub End Module