Double value Format Strings: F3 and specific culture
Imports System.Globalization
Module Example
Sub Main()
Dim doubleNumber As Double
doubleNumber = 12345.1234
Console.WriteLine(doubleNumber.ToString("F3",CultureInfo.CreateSpecificCulture("es-ES")))
End Sub
End Module