MaximoAccess

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

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração


Participe do fórum, é rápido e fácil

MaximoAccess

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

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração

MaximoAccess

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

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


2 participantes

    [Resolvido]Proibir espaço ao preencher campo

    Alexandre Silvacosta
    Alexandre Silvacosta
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 24
    Registrado : 16/02/2017

    [Resolvido]Proibir espaço ao preencher campo Empty [Resolvido]Proibir espaço ao preencher campo

    Mensagem  Alexandre Silvacosta 24/4/2017, 22:50

    Boa noite à todos!
    Gostaria de uma maneira de proibir espaço ao digitar em um determinado campo do formulário.
    Para ser exato, tenho um formulário que há um campo chamado "Tag do equipamento"
    Esse campo deve ser preenchido da seguinte maneira:
    TAG DO EQUIPAMENTO => MB904.
    Pois preciso de exatidão na pesquisa, se o funcionário preencher "MB 904" com espaço, vai gerar transtorno na
    pesquisa.
    Desde já agradeço!
    CassioFabre
    CassioFabre
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 731
    Registrado : 18/01/2013

    [Resolvido]Proibir espaço ao preencher campo Empty Re: [Resolvido]Proibir espaço ao preencher campo

    Mensagem  CassioFabre 25/4/2017, 14:59

    Bom dia,

    Há duas maneiras: formatando o campo após o preenchimento ou bloqueando a tecla espaço neste campo.

    A primeira:
    No evento Após Atualizar do campo coloque:
    Código:
    me.SeuCampo = replace(seucampo, " ", "")

    Para o segundo método faça o seguinte: nas propriedades do formulário altere a propriedade "Visualizar Teclas" para SIM. Em seguida, no evento Ao Apertar Tecla do formulário coloque:
    Código:
    Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
        If Screen.ActiveControl.Name = "SeuCampo" Then
            If KeyCode = 32 Then 'KeyCode da tecla Espaço
                KeyCode = 0
            End If
        End If
    End Sub

    As duas maneiras impedirão o espaço no campo, a primeira tirará o espaço após o campo ser atualizado, a segunda impedirá que o usuário insira qualquer espaço no campo.

    Abraço.


    Última edição por CassioFabre em 26/4/2017, 11:13, editado 1 vez(es)
    Alexandre Silvacosta
    Alexandre Silvacosta
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 24
    Registrado : 16/02/2017

    [Resolvido]Proibir espaço ao preencher campo Empty Re: [Resolvido]Proibir espaço ao preencher campo

    Mensagem  Alexandre Silvacosta 25/4/2017, 20:55

    Amigo, não sei o que está errado, pois fiz os dois exemplos e o primeiro me apresenta um erro em tempo de execução '13'
    "tipos incompatíveis".
    E o segundo exemplo não acontece nada.
    CassioFabre
    CassioFabre
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 731
    Registrado : 18/01/2013

    [Resolvido]Proibir espaço ao preencher campo Empty Re: [Resolvido]Proibir espaço ao preencher campo

    Mensagem  CassioFabre 25/4/2017, 20:57

    Boa tarde,

    Onde está "SeuCampo" não esqueça de alterar para o nome do seu campo. Por exemplo txtTagEquipamento.

    Abraço.
    Alexandre Silvacosta
    Alexandre Silvacosta
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 24
    Registrado : 16/02/2017

    [Resolvido]Proibir espaço ao preencher campo Empty Re: [Resolvido]Proibir espaço ao preencher campo

    Mensagem  Alexandre Silvacosta 25/4/2017, 23:23

    Pois é, fiz isso sim. Mas o erro continua. scratch
    CassioFabre
    CassioFabre
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 731
    Registrado : 18/01/2013

    [Resolvido]Proibir espaço ao preencher campo Empty Re: [Resolvido]Proibir espaço ao preencher campo

    Mensagem  CassioFabre 26/4/2017, 11:17

    Bom dia,

    Segue em anexo um modelo para exemplificar.

    Como dica adicional deixo aqui um modelo que coloquei no repositório que bloqueia teclas e/ou combinações de teclas a nível de usuário: https://www.maximoaccess.com/t28233-bloquear-teclas-via-funcao#197583

    Abraço.
    Anexos
    [Resolvido]Proibir espaço ao preencher campo Attachmentmodelo1.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (22 Kb) Baixado 15 vez(es)
    Alexandre Silvacosta
    Alexandre Silvacosta
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 24
    Registrado : 16/02/2017

    [Resolvido]Proibir espaço ao preencher campo Empty Re: [Resolvido]Proibir espaço ao preencher campo

    Mensagem  Alexandre Silvacosta 26/4/2017, 23:32

    Amigo, talvez eu não tenha te explicado que infelizmente não sou programador, ou que ainda estou na fase de início em criar
    projetos em access e que te peço desculpas por isso! Notei que os códigos que estão neste tópico e os que você disponibilizou para baixar estão um pouco diferente. Como não sou programador, não tive a sensibilidade
    de perceber se era pra criar uma linha de código baseado no exemplo do tópico, ou se realmente era pra substituir "seu campo" Por o nome do campo do form.
    Mas gostaria de te agradecer por a paciência e dedicação! O problema foi resolvido graças a você!
    CassioFabre
    CassioFabre
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 731
    Registrado : 18/01/2013

    [Resolvido]Proibir espaço ao preencher campo Empty Re: [Resolvido]Proibir espaço ao preencher campo

    Mensagem  CassioFabre 27/4/2017, 12:28

    Bom dia,

    Não há problema algum. O fórum agradece o retorno.

    Abraço.

    Conteúdo patrocinado


    [Resolvido]Proibir espaço ao preencher campo Empty Re: [Resolvido]Proibir espaço ao preencher campo

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 17/5/2024, 10:02