Module Demo
Sub DemoTraditional()
Dim x As Decimal = 1234.568
Console.WriteLine(FormattedIT(x))
Console.WriteLine(FormattedUS(x))
End Sub
End Module

Public Class TraditionalMethods
Shared Function FormattedIT(ByVal d As Decimal) As String
	Return String.Format(formatIT, "{0:#,0.00}", d)
End Function

Shared Function FormattedUS(ByVal d As Decimal) As String
	Return String.Format(formatUS, "{0:#,0.00}", d)
End Function

Shared formatUS As CultureInfo = New CultureInfo("en-US")
Shared formatIT As CultureInfo = New CultureInfo("it-IT")
End Class
