La funzione predefinita FormatCurrency del VBScript consente di formattare automaticamente un numero indicandolo come valuta, associandogli il simbolo dell’euro e, in più, separa automaticamente le porzioni decimali e le centinaia dalle migliaia.
Facciamo un esempio:
<%
Dim importo
importo = 100
Response.Write "Importo: " & FormatCurrency(importo, 0)
%>
Restituisce “Importo: € 100″.
Il secondo parametro passato alla funzione è facoltativo; se impostato su zero (0) elimina le porzioni decimali dopo la virgola.
Ipotizziamo di voler indicare come valuta il dollaro piuttosto che l’euro; scriveremo
<%
Dim importo, risultato
importo = 100
risultato = Replace(FormatCurrency(importo, 0), "€", "$")
Response.Write "Importo: " & risultato
%>
Restituisce “Importo: $ 100″.
