FormatCurrency, fonction

Microsoft VBScript

Microsoft® Visual Basic® Scripting Edition FormatCurrency, fonction Référence du langage 
Version 1 


Description
Renvoie une expression formatée sous forme de valeur de type Currency utilisant le symbole monétaire défini dans le Panneau de configuration du système.
Syntaxe
FormatCurrency(Expression[,NumDigitsAfterDecimal [,IncludeLeadingDigit [,UseParensForNegativeNumbers [,GroupDigits]]]])

La syntaxe de la fonction FormatCurrency comprend les éléments suivants:

élément Description
Expression Requis. Expression à formater.
NumDigitsAfterDecimal Facultatif. Valeur numérique indiquant combien de positions à la droite de la décimale sont affichées. La valeur par défaut (-1) indique que les paramètres régionaux de l'ordinateur sont employés.
IncludeLeadingDigit Facultatif. Constante 3-états indiquant si un zéro non significatif s'affiche pour les valeurs décimales. Reportez-vous à la section Valeurs.
UseParensForNegativeNumbers Facultatif. Constante 3-états indiquant s'il faut mettre les valeurs négatives entre parenthèses. Reportez-vous à la section Valeurs.
GroupDigits Facultatif. Constante 3-états indiquant s'il faut ou non grouper les nombres en utilisant le séparateur de groupe spécifié dans les paramètres régionaux de l'ordinateur. Reportez-vous à la section Valeurs.

Valeurs
Les arguments IncludeLeadingDigit, UseParensForNegativeNumbers et GroupDigits peuvent prendre les valeurs suivantes:

Constante Value Description
TristateTrue -1 True
TristateFalse  0 False
TristateUseDefault -2 Utilise les paramètres régionaux de l'ordinateur.

Notes
Lorsque un ou plusieurs arguments sont omis, les valeurs de ces arguments sont fournies par les paramètres régionaux de l'ordinateur. La position du symbole monétaire relatif à la valeur monétaire est déterminée par les paramètres régionaux du système.


Remarque   Toutes les informations de paramètres sont définies dans l'onglet Symbole monétaire des Paramètres régionaux, à l'exception du zéro non significatif issu de l'onglet Nombre.

L'exemple ci-dessous utilise la fonction FormatCurrency pour mettre en forme l'expression en devise et l'affecter à MyCurrency :

Dim MyCurrency
MyCurrency = FormatCurrency(1000)  ' MyCurrency contient 1000,00 F