FormatCurrency 函数

返回表达式,此表达式已被格式化为货币值(使用系统控制面板中定义的货币符号)。

FormatCurrency(
  expression[,NumDigitsAfterDecimal [,IncludeLeadingDigit [,UseParensForNegativeNumbers [,GroupDigits]]]]
)

参数

Expression

必选项。要被格式化的表达式。

NumDigitsAfterDecimal

可选项。指示小数点右侧显示位数的数值。默认值为 -1,指示使用的是计算机的区域设置。

IncludeLeadingDigit

可选项。三态常数,指示是否显示小数值小数点前面的零。有关数值,请参阅“设置”部分。

UseParensForNegativeNumbers

可选项。三态常数,指示是否将负值置于括号中。有关数值,请参阅“设置”部分。

GroupDigits

可选项。三态常数,指示是否使用计算机区域设置中指定的数字分组符号将数字分组。有关数值,请参阅“设置”部分。

设置

IncludeLeadingDigit、UseParensForNegativeNumbers 和 GroupDigits 参数可以有以下值:

常数 描述
TristateTrue -1 True
TristateFalse 0 False
TristateUseDefault -2 使用计算机区域设置中的设置。

说明

当省略一个或多个可选项参数时,由计算机区域设置提供被省略参数的值。 与货币值相关的货币符号的位置由系统的区域设置决定。

注意 除“显示起始的零”设置来自区域设置的“数字”附签外,所有其他设置信息均取自区域设置的“货币”附签。

下面例子利用 FormatCurrency 函数把 expression 格式化为 currency 并且赋值给 MyCurrency:

Dim MyCurrency
MyCurrency = FormatCurrency(1000)  'MyCurrency 包含 $1000.00 

要求

版本2

请参阅

FormatDateTime 函数 | FormatNumber 函数 | FormatPercent 函数

www.holmesian.org
虎的笑话 虎的成语 虎的歇后语