Rappresentare in formato stringa un numero avente i punti delle migliaia e la virgola dei decimali

Per rappresentare in formato stringa e stampare un numero avente i punti delle migliaia e la virgola dei decimali, si potrà far riferimento al seguente codice:

Public Sub Main()

  Dim f As Float
  Dim s As String

  f = 25691972.06   ' Numero da rappresentare

  s = Trim(Format(f, "###,###,###,###,#.###"))

  Print s

End