MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

Obrigado

Administração do MaximoAccess

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access

    [Resolvido]Padronizar Campo

    Compartilhe
    avatar
    Ney
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 236
    Registrado : 08/10/2012

    [Resolvido]Padronizar Campo

    Mensagem  Ney em Qui 11 Ago 2016, 15:33

    Pessoal Bom dia!!!

    Estou querendo implementar um códio que corrija e faça a padronização dos dados que são inseridos, tenho um campo "End_Contato" que encontrei varios erros de padronização,exemplo,

    Por padrão foi acertados que:

    "Rua" seria somente "R"
    "Travessa" seria somente "Tv"
    "Rodovia" seria somente "Rd"

    Mas mesmo assim o erro persiste, então tentei implementa um código,



    Código:
        If End_Contato= "Rua" Then
            me.End_Contato= "R"
            
            ElseIf End_Contato= "Travessa" Then
            me.End_Contato= "TV"
            
            ElseIf End_Contato= "Rodovia" Then
            me.End_Contato= "RD"
                
         End If


    A milha dúvida é como colocaria esse evento para disparar apos liberar a tecla "espaço", ou se tiver alguma ideia melhor, favor compartilhem conosco,

    Att; Sidney

    Convidado
    Convidado

    Re: [Resolvido]Padronizar Campo

    Mensagem  Convidado em Qui 11 Ago 2016, 15:51

    avatar
    Ney
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 236
    Registrado : 08/10/2012

    Re: [Resolvido]Padronizar Campo

    Mensagem  Ney em Qui 11 Ago 2016, 17:38

    Perfeito Avelino

    Muito obrigado!!

    Att; Sidney

      Data/hora atual: Sab 22 Jul 2017, 17:45