Imports System.Globalization
Imports System.Threading
Module Example
Public Sub Main()
Dim value As Double = 9999.62901
Dim specifier As String
Dim culture As CultureInfo
specifier = "P"
culture = CultureInfo.InvariantCulture
Console.WriteLine((value/10000).ToString(specifier, culture))
culture = CultureInfo.CreateSpecificCulture("ar-EG")
Console.WriteLine((value/10000).ToString(specifier, culture))
End Sub
End Module