FormatCurrency 函數

返回表達式，此表達式已被格式化為貨幣值（使用系統控制面板中定義的貨幣符號）。

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

參數

Expression

必選項。要被格式化的表達式。

NumDigitsAfterDecimal

可選項。指示小數點右側顯示位數的數值。默認值為 -1，指示使用的是計算機的區域設置。

IncludeLeadingDigit

可選項。三態常數，指示是否顯示小數值小數點前面的零。有關數值，請參閱“設置”部分。

UseParensForNegativeNumbers

可選項。三態常數，指示是否將負值置于括號中。有關數值，請參閱“設置”部分。

GroupDigits

可選項。三態常數，指示是否使用計算機區域設置中指定的數字分組符號將數字分組。有關數值，請參閱“設置”部分。

設置

IncludeLeadingDigit、UseParensForNegativeNumbers 和 GroupDigits 參數可以有以下值：

說明

當省略一個或多個可選項參數時，由計算機區域設置提供被省略參數的值。 與貨幣值相關的貨幣符號的位置由系統的區域設置決定。

注意 除“顯示起始的零”設置來自區域設置的“數字”附簽外，所有其他設置信息均取自區域設置的“貨幣”附簽。

下面例子利用 FormatCurrency 函數把 expression 格式化為 currency 并且賦值給 MyCurrency:

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