Imports System

Imports System.Globalization

Public Module Module1

    Public Sub Main()

        Dim ptbr = new CultureInfo("pt-br")

        Console.WriteLine("{0}", 123.ToString("N2", ptbr))

        Console.WriteLine("{0}", 123.123.ToString("N2", ptbr))

        Console.WriteLine("{0}", 123123132112321321.123d.ToString("N2", ptbr))

        Console.WriteLine("{0}", 0.123.ToString("N2", ptbr))

        Console.WriteLine("{0}", 0.158123.ToString("N2", ptbr))

    End Sub

End Module