Imports System

Public Module Module1

    Public Sub Main()

        Dim number = 1111111111111111111    

        Console.WriteLine(String.Format("{0:N0}", Clng(number.ToString("G16"))))

    End Sub

End Module