Imports System
Imports System.Globalization
Public Class Program
Public Shared Sub Main()
Console.WriteLine((387.00).ToString("0.00").Replace(".00", ""))
Console.WriteLine((3145.90).ToString("0.00").Replace(".00", ""))
Console.WriteLine((84978.99).ToString("0.00").Replace(".00", "") & Environment.NewLine)
Console.WriteLine((387.00).ToString("C", CultureInfo.CurrentCulture))
Console.WriteLine((3145.90).ToString("C", CultureInfo.CurrentCulture))
Console.WriteLine((84978.99).ToString("C", CultureInfo.CurrentCulture) & Environment.NewLine)
Console.WriteLine((387.00).ToString("C", New CultureInfo("en-GB")))
Console.WriteLine((3145.90).ToString("C", New CultureInfo("en-GB")))
Console.WriteLine((84978.99).ToString("C", New CultureInfo("fr-FR")))
End Sub
End Class
' run:
'
' 387
' 3145.90
' 84978.99
'
' $387.00
' $3,145.90
' $84,978.99
'
' £387.00
' £3,145.90
' 84 978,99 €
'
'
