CPF ou CNPJ no formulário

CPF ou CNPJ no formulário - Máscara de entrada

Nota importante: para ter acesso aos vídeos e arquivos exemplos deste site, adquira um dos planos apresentados abaixo. Você pode comprar em até 5x no Cartão de Crédito.

Veja como comprar e saiba mais sobre o material oferecido, clicando aqui.

Open v3

Usuário Cleber:

Olá, estou usando o seguinte código para ocultar o rótulo CNPJ, caso seja pessoa física e exibir o rótulo CPF ou o contrário. Também aplicar máscara de entrada nos diferentes casos.

If Me.PESSOA_TIPO.Value = "F" Then
   TXCNPJ.Visible = False
   TXCPF.Visible = True
   Me.[CPF/CNPJ].InputMask = "###,###,###-##"
ElseIf Me.PESSOA_TIPO.Value = "J" Then
   TXCNPJ.Visible = True
   TXCPF.Visible = False
   Me.[CPF/CNPJ].InputMask = "##,###,###/####-##"
ElseIf Me.PESSOA_TIPO.Value <> "F" Or Me.PESSOA_TIPO.Value <> "J" Then
   MsgBox "Digite "F" para pessoa física ou "J" para pessoa jurídica", , "Dígito inválido"

End If

Se eu incluir no evento Ao alterar do campo PESSOA_TIPO, funciona perfeitamente, MAS PORQUE NÃO FUNCIONA NOS EVENTOS, "No atual", "Ao filtrar", "Ao ativar" ? Não consigo encontrar o erro.

Obrigado.

Suporte:

Cléber, compare o seu código com este pequeno exemplo que fiz. Usei dois modelos - um Quadro e uma ComboBox, conforme imagem.

Selecionar Cpf_Cnpj

Os códigos e os eventos utilizados foram estes:

Faça o login aqui para ter acesso ao código.

Download

MascaraCPF_CNPJ.zip

| Home | Vídeos | Tutoriais | Dicas | Ribbons | Suporte | Downloads | Contato | Artigo |

Não há comentário

Usando Access

CPF ou CNPJ no formulário - Máscara de entrada