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]Caixa de Combinação que muda a Máscara da Caixa de Texto com Fonte do Controle

    avatar
    ZéBilingo
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 17
    Registrado : 26/10/2015

    [Resolvido]Caixa de Combinação que muda a Máscara da Caixa de Texto com Fonte do Controle Empty [Resolvido]Caixa de Combinação que muda a Máscara da Caixa de Texto com Fonte do Controle

    Mensagem  ZéBilingo em 25/11/2016, 20:43

    Prezados Mestres!
    Fiz uma extensa pesquisa mas não consegui resolver a seguinte questão.
    Tenho um formulário com um campo para informar PIS, PASEP, NIS ou NIT. Apesar do mesmo número de algarismos, as máscaras são diferentes, Assim, preciso selecionar numa Caixa de Combinação o tipo de documento e esta seleção colocar a máscara no campo especificado. Consegui parte disso conforme abaixo, porém quando seleciono outro registro com outra máscara o Access muda todas as máscaras para a última selecionada.
    Mais uma vez agradeço a atenção.

    Private Sub CBO_PISPASEP2_AfterUpdate()
    If Me.CBO_PISPASEP2 = "PIS" Then
    Me.txtPISPASEP.InputMask = "000\.00000\.00\-0"
    End If
    If Me.CBO_PISPASEP2 = "PASEP" Then
    Me.txtPISPASEP.InputMask = "0\.000\.000\.000\-0"
    End If
    If Me.CBO_PISPASEP2 = "NIT" Then
    Me.txtPISPASEP.InputMask = "000\.00000\.00\-0"
    End If
    If Me.CBO_PISPASEP2 = "NIS" Then
    Me.txtPISPASEP.InputMask = ""
    End If
    End Sub
    FabioPaes
    FabioPaes
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3914
    Registrado : 14/08/2013

    [Resolvido]Caixa de Combinação que muda a Máscara da Caixa de Texto com Fonte do Controle Empty Re: [Resolvido]Caixa de Combinação que muda a Máscara da Caixa de Texto com Fonte do Controle

    Mensagem  FabioPaes em 25/11/2016, 21:12

    Amigo, uma solução prática para isso é inserir a Mascara junto com o Campo...

    Considerações:
    O Campo deve ser do Tipo Texto;
    A Caixa de Texto do Formulário não deve ter nenhuma mascara de Entrada.


    Feito essas Mudanças, mude o Comando do Evento apos atualizar da CBO_PISPASEP2 para:


    Private Sub CBO_PISPASEP2_AfterUpdate()


    Select Case Me.CBO_PISPASEP2
        Case "PIS", "NIT" 'Juntei aqui, pois a Mascara de ambos são iguais.
        Me.txtPisPasep.InputMask = "000\.00000\.00\-0;0"
        Case "PASEP"
        Me.txtPisPasep.InputMask = "0\.000\.000\.000\-0;0"
        Case "NIS"
        Me.txtPisPasep.InputMask = ""
    End Select

    End Sub




    Observe que na sua mascara foi adicionado  ;0 no final ("0\.000\.000\.000\-0;0") para guardar também a mascara.


    .................................................................................
    _____________________________________________________________________
    Achou a solução para sua dúvida? Não seja Egoísta, Compartilhe com todos!
    A dica do Colega foi útil? Agradeça!

    O importante não saber tudo, mas sim a Onde procurar!
    avatar
    ZéBilingo
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 17
    Registrado : 26/10/2015

    [Resolvido]Caixa de Combinação que muda a Máscara da Caixa de Texto com Fonte do Controle Empty Re: [Resolvido]Caixa de Combinação que muda a Máscara da Caixa de Texto com Fonte do Controle

    Mensagem  ZéBilingo em 25/11/2016, 21:27

    Caro Fábio,

    Fiz as alterações que você indicou mas não surtiu efeito, ao alterar um registro ele põe a mesma máscara em todos e após fechar o formulário todos retornam sem máscara.
    FabioPaes
    FabioPaes
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3914
    Registrado : 14/08/2013

    [Resolvido]Caixa de Combinação que muda a Máscara da Caixa de Texto com Fonte do Controle Empty Re: [Resolvido]Caixa de Combinação que muda a Máscara da Caixa de Texto com Fonte do Controle

    Mensagem  FabioPaes em 25/11/2016, 22:02

    Posta aqui pra eu verificar... Pq aqui deu certinho...


    Obs: Só Funcionará para Novos Registros...


    .................................................................................
    _____________________________________________________________________
    Achou a solução para sua dúvida? Não seja Egoísta, Compartilhe com todos!
    A dica do Colega foi útil? Agradeça!

    O importante não saber tudo, mas sim a Onde procurar!
    avatar
    Noobezinho
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3632
    Registrado : 29/06/2012

    [Resolvido]Caixa de Combinação que muda a Máscara da Caixa de Texto com Fonte do Controle Empty Re: [Resolvido]Caixa de Combinação que muda a Máscara da Caixa de Texto com Fonte do Controle

    Mensagem  Noobezinho em 25/11/2016, 22:49

    Carlos

    Você disse: "ao alterar um registro ele põe a mesma máscara em todos ..."

    O formulário é contínuo?

    [ ]'s

    Silvio
    Silvio
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 4370
    Registrado : 20/04/2011

    [Resolvido]Caixa de Combinação que muda a Máscara da Caixa de Texto com Fonte do Controle Empty Re: [Resolvido]Caixa de Combinação que muda a Máscara da Caixa de Texto com Fonte do Controle

    Mensagem  Silvio em 25/11/2016, 22:52

    Boa noite, se me permitem....

    Select Case Me.CBO_PISPASEP2
    Case "PIS", "NIT" 'Juntei aqui, pois a Mascara de ambos são iguais.
    Me.txtPisPasep.InputMask = "@@@.@@@@@\@@-@"
    Case "PASEP"
    Me.txtPisPasep.InputMask = "@.@@@.@@@.@@@-@"
    Case "NIS"
    Me.txtPisPasep.InputMask = ""
    End Select


    colocar essa rotina no evento ao sair do campo.

    Em tempo, caso surta efeito, essas mascaras deverão estar nos eventos: ao carregar, ao abrir, no atual do formulário.




    .................................................................................
    Caso tenha resolvido a tua duvida, coloque o tópico como resolvido.
    www.maximoaccess.com/t860-resolucao-de-topicos

    "Quase tudo é possível quando se tem determinação e força de vontade. Não desista tão rápido."
    Silvio
    Silvio
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 4370
    Registrado : 20/04/2011

    [Resolvido]Caixa de Combinação que muda a Máscara da Caixa de Texto com Fonte do Controle Empty Re: [Resolvido]Caixa de Combinação que muda a Máscara da Caixa de Texto com Fonte do Controle

    Mensagem  Silvio em 25/11/2016, 22:53

    Eita....Noobezinho, nem vi a tua resposta.....

    Se for formulário continuo....esqueça as mascaras não irão funcionar.


    .................................................................................
    Caso tenha resolvido a tua duvida, coloque o tópico como resolvido.
    www.maximoaccess.com/t860-resolucao-de-topicos

    "Quase tudo é possível quando se tem determinação e força de vontade. Não desista tão rápido."
    avatar
    ZéBilingo
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 17
    Registrado : 26/10/2015

    [Resolvido]Caixa de Combinação que muda a Máscara da Caixa de Texto com Fonte do Controle Empty Re: [Resolvido]Caixa de Combinação que muda a Máscara da Caixa de Texto com Fonte do Controle

    Mensagem  ZéBilingo em 25/11/2016, 23:09

    Meus Caros,

    Está funcionando para alguns registros, vou estudar no fim de semana e retorno a vocês, não consegui anexar o arquivo, mesmo compactado ficou com um pouco mais de 5 MB.
    Obrigado e bom final de semana a todos!
    avatar
    Noobezinho
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3632
    Registrado : 29/06/2012

    [Resolvido]Caixa de Combinação que muda a Máscara da Caixa de Texto com Fonte do Controle Empty Re: [Resolvido]Caixa de Combinação que muda a Máscara da Caixa de Texto com Fonte do Controle

    Mensagem  Noobezinho em 26/11/2016, 17:51

    Carlos

    Deletei as nossas ultimas mensagens para deixar teu tópico limpo Wink

    Então, o que me deixou intrigado é pelo fato do código passado pelo amigo

    FabioPaes não ter funcionado.

    Atente para as considerações feitas por ele:

    O Campo deve ser do Tipo Texto;
    A Caixa de Texto do Formulário não deve ter nenhuma mascara de Entrada.


    Verifique se não existe nenhum código nas propriedades da caixa de texto txtPISPASEP

    que possa estar interferindo na máscara de entrada.

    Caso ainda não tenha conseguido, sugiro que separe a tabela/consulta e o formulário com 2 ou 3 registros

    e disponibilize para nós poder analisar.

    [ ]'s
    avatar
    ZéBilingo
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 17
    Registrado : 26/10/2015

    [Resolvido]Caixa de Combinação que muda a Máscara da Caixa de Texto com Fonte do Controle Empty Re: [Resolvido]Caixa de Combinação que muda a Máscara da Caixa de Texto com Fonte do Controle

    Mensagem  ZéBilingo em 26/11/2016, 19:03

    Caro, Fábio, Nobezinho e Sílvio,

    Após efetuar todas as mudanças propostas por vocês e uma compactação reparação do BD, o campos está funcionando como precisava.
    Mais uma vez, obrigado a todos.
    FabioPaes
    FabioPaes
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3914
    Registrado : 14/08/2013

    [Resolvido]Caixa de Combinação que muda a Máscara da Caixa de Texto com Fonte do Controle Empty Re: [Resolvido]Caixa de Combinação que muda a Máscara da Caixa de Texto com Fonte do Controle

    Mensagem  FabioPaes em 26/11/2016, 20:46

    Grato pelo retorno! Até a Próxima se Deus quiser!

    Conteúdo patrocinado

    [Resolvido]Caixa de Combinação que muda a Máscara da Caixa de Texto com Fonte do Controle Empty Re: [Resolvido]Caixa de Combinação que muda a Máscara da Caixa de Texto com Fonte do Controle

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 16/6/2019, 22:20