Aplicável a
Objeto ComboBox |
---|
Objeto TextBox |
Você pode usar a propriedade Formato para personalizar a maneira como números, datas, horários e textos são exibidos e impressos. Cadeia de caracteres de leitura/gravação.
expressão.Formato
expressão Obrigatória. Uma expressão que retorna um dos objetos na lista Aplica-se a.
Comentários
Você pode usar um dos formatos predefinidos ou pode criar um formato personalizado usando os símbolos de formatação.
A propriedade Formato usa configurações diferentes para diferentes tipos de dados.
Em um controle, você pode definir essa propriedade na folha de propriedades do controle. Em um campo, você pode definir essa propriedade no modo de exibição Design da tabela (na seção Propriedades do Campo) ou modo de exibição Design do janela Consulta (na folha de propriedades Propriedades do Campo). Você também pode usar um macro ou Visual Basic for Applications (VBA)
Observação: No Visual Basic, insira um expressão de cadeia de caracteres que corresponda a um dos formatos predefinidos ou insira um formato personalizado.
A propriedade Formato afeta apenas o modo como os dados são exibidos. Ele não afeta o modo como os dados são armazenados.
O Access fornece formatos predefinidos para os tipos de dados Data/Hora, Número e Moeda, Texto e Memorando e Sim/Não. Os formatos predefinidos variam de acordo com o país/região especificado clicando duas vezes em Opções Regionais no Painel de Controle do Windows. O Access exibirá os formatos apropriados para o país/região selecionado. Por exemplo, inglês (Estados Unidos) selecionado na guia Geral, 1234,56 em formato de moeda aparecerá como $1,234.56, mas quando inglês (Britânico) for selecionado na guia Geral, o número será exibido como £1,234.56.
Se você definir a propriedade Formato de um campo no modo de exibição Design da tabela, o Access usará esse formato para exibir dados em folhas de dados. Isso também se aplica à propriedade Formato do campo para novos controles em formulários e relatórios.
Você pode usar os seguintes símbolos em formatos personalizados para qualquer tipo de dados.
Símbolo |
Significado |
---|---|
(espaço) |
Exiba espaços como caracteres literais. |
"ABC" |
Não exiba nada entre aspas como caracteres literais. |
! |
Force o alinhamento à esquerda em vez de à direita. |
* |
Preencha o espaço disponível com o próximo caractere. |
\ |
Exiba o próximo caractere como caractere literal. Você também pode exibir os caracteres literais colocando-os entre aspas. |
[cor] |
Exiba dados formatados em cores especificadas entre os colchetes. Cores disponíveis: Preto, azul, verde, ciano, vermelho, magenta, amarelo, branco. |
Você não pode misturar símbolos de formatação personalizada para os tipos de dados Número e Moeda com Data/Hora, Sim/Não ou símbolos de formatação Texto e Memorando.
Quando você tiver definido um máscara de entrada e configurar a propriedade Formato para os mesmos dados, a propriedade Formato terá precedência quando os dados forem exibidos e a máscara de entrada será ignorada. Por exemplo, se você criar uma máscara de entrada Senha no modo de exibição Design da tabela e também definir a propriedade Formato para o mesmo campo na tabela ou em um controle em um formulário, a máscara de entrada Senha será ignorada e os dados são exibidos de acordo com a propriedade Formato.
Exemplo
Os três exemplos a seguir definem a propriedade Formato usando um formato predefinido:
Me!Date.Format = "Medium Date"
Me!Time.Format = "Long Time"
Me!Registered.Format = "Yes/No"
O exemplo a seguir define a propriedade Formato usando um formato personalizado. Esse formato exibe uma data da seguinte maneira: janeiro de 1995.
Forms!Employees!HireDate.Format = "mmm yyyy"
O exemplo a seguir demonstra uma função VBA que formata dados numéricos usando o formato de moeda e formata os dados de texto totalmente em letras maiúsculas. A função é chamada do evento OnLostFocus de um controle não associado denominado TaxRefund.
Function FormatValue() As Integer
Dim varEnteredValue As Variant
varEnteredValue = Forms!Survey!TaxRefund.Value
If IsNumeric(varEnteredValue) = True Then
Forms!Survey!TaxRefund.Format = "Currency"
Else
Forms!Survey!TaxRefund.Format = ">"
End If
End Function