Ir diretamente para o conteúdo principal

Formato da moeda

Devolve uma expressão formatada como um valor monetário utilizando o símbolo monetário definido no painel de controlo do sistema.

Estrutura

FormatCurrency(Expressão[,NúmeroDeDígitosApósAVírgula [,IncluirDígitoInicial [,UsarParêntesesParaNúmerosNegativos [,AgruparDígitos]]]])

Parâmetros

Expressão - Obrigatório. Expressão a formatar.

NumDigitsAfterDecimal - Opcional. Valor numérico que indica quantas casas decimais são exibidas. O valor predefinido é -1, o que indica que são utilizadas as definições regionais do computador.

IncludeLeadingDigit - Opcional. Constante Tristate que indica se deve ou não ser exibido um zero à esquerda nos valores fracionários. Consulte a secção «Definições» para ver os valores.

UseParensForNegativeNumbers - Opcional. Constante Tristate que indica se os valores negativos devem ou não ser colocados entre parênteses. Consulte a secção «Definições» para obter os valores de «

».

GroupDigits - Opcional. Constante Tristate que indica se os números são ou não agrupados utilizando o delimitador de grupo especificado nas definições regionais do computador. Consulte a secção «Definições» para ver os valores.

Valores dos parâmetros

As opções IncludeLeadingDigit, UseParensForNegativeNumbers e GroupDigits têm os seguintes valores:

Valor constante Descrição

TristateTrue -1 True

TristateFalse 0 False

TristateUseDefault -2 Utilizar a configuração das definições regionais do computador.

Descrição

Quando uma ou mais estruturas opcionais são omitidas, os valores para as estruturas omitidas são fornecidos pelas configurações regionais do computador. A posição do símbolo da moeda em relação ao valor da moeda é determinada pelas configurações regionais do sistema.

Nota

Todas as informações de configuração provêm do separador «Moeda» das Configurações Regionais, exceto o zero à esquerda, que provém do separador «Números».

Exemplo

O exemplo seguinte utiliza a função FormatCurrency para formatar a expressão como moeda e atribuí-la a MyCurrency:

Dim MyCurrency

MyCurrency = FormatCurrency(1000) ' MyCurrency contém $1000,00. |