Ottenere dalla funzione Format() un valore con il punto anziché con la virgola

Il caso è quello in cui si ha un valore in virgola mobile, e, gestendolo con la funzione Format(), si intende ottenere come risultato finale anche una rappresentazione di esso con il punto anziché con la virgola.

Per fare ciò si dovrà adoperare adeguatamente la funzione CStr() .

Mostriamo un esempio:

Public Sub Main()

 Dim f As Float
 Dim s As String
 
  f = 12345.6789

' Così si ottiene una rappresentazione grafica con la virgola del numero:
  Print f


' Già così si ottiene una rappresentazione grafica del numero con il punto anziché con la virgola:
  s = CStr(f)
  Print s

' ...ma noi dobbiamo manipolare la stringa di quel numero mediante la funzione "Format()":
  f = Val(Format$(s, "#.##"))

' Così si ottiene ancora una rappresentazione grafica con la virgola del numero:
  Print f

' Così si ottiene la rappresentazione grafica finale del numero, manipolato con la funzione "Format()", con il punto anziché con la virgola:
  Print CStr(f)

End