Imports System Public Class MainClass Shared Sub Main() Dim TestNumber As Integer = 45600 Dim TestString As String = FormatNumber(TestNumber, 2, , , TriState.True) Console.WriteLine(TestString) End Sub End Class