(Resolvido) Caixa de Texto: formatação condicional da fonte

[lurbano]

Prezado(a)s:

Procurei esclarecimentos nos tópicos postados e nada encontrei, por isso solicito ajuda.

Não sou muito experiente com a programação em access e gostaria de fazer algo que não estou conseguindo:

- Em determinado formulátio, tenho uma Caixa de Texto que recebe valores de acordo com uma checagem no banco, um "status", que podem ser: ADIMPLENTE, INADIMPLENTE OU VERIFICAR.

Como faço para formatar a cor da fonte de acordo com o status?

Antecipadamente agradeço a atenção e parabéns aos idealizadores e administradores deste espaço extremamente útil e democrático.

[MrMALJ]

Sua dúvida é relativamente simples porém você não passou informação importante para que possamos ajuda-lo, esse formulário é uma entrada de dados ou seria na impressão?

E quando você deseja que seja faita essa validação na hora que você insere o registro ou em outra situação?

[Argus]

No formulário crie um procedimento para a caixa de texto no evento ApósAtualizar.

No exemplo que utilizei para testar criei uma caixa com o nome CaixaStatus, então você

pode adaptar para o nome do seu campo e colocar as cores que você quiser.

O código fica assim:

Private Sub CaixaStatus_AfterUpdate()
    
    If Not IsNull(CaixaStatus.Value) Then
        Select Case CaixaStatus.Value
            Case "ADIMPLENTE"
                CaixaStatus.ForeColor = vbBlue
            Case "INADIMPLENTE"
                CaixaStatus.ForeColor = vbRed
            Case "VERIFICAR"
                CaixaStatus.ForeColor = vbGreen
            Case Else
                CaixaStatus.ForeColor = vbBlack
        End Select
    End If

End Sub

[lurbano]

Argus e MrMALJ;

Com as dicas e alguns testes, o objetivo foi atingido ...

Agradeço a ambos.

Att,