Zahl mit Dezimalzahlstellen formatieren

1
2
3
4
5
6
7
8

''' <summary>
''' Diese Funktion fügt zu einer Zahl Dezimalzahlstellen hinzu.
''' Aus 1000000 wird dann 1.000.000
''' </summary>
''' <param name="Number">Die Zahl die Formatiert werden soll</param>
Public Function FormatNumber(ByVal Number As Long) As String
    Return Format(Number, "#,##0")
End Function