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


    [Resolvido]Espaço em Textbox

    avatar
    crovador
    Novato
    Novato

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 23
    Registrado : 03/04/2018

    [Resolvido]Espaço em Textbox Empty [Resolvido]Espaço em Textbox

    Mensagem  crovador 4/12/2020, 12:09

    Bom dia a todos...
    Preciso de ajuda para uma textbox em meu formulário.
    Queria bloquear o espaço se ela estiver em branco, ou seja, só liberar depois que for digitado algum caractere. Segue abaixo exemplo:

    Private Sub text_cadastro_Change()
    End Sub


    Se poder ajudar-me ficaria grato.

    Fiquem com Deus...
    crysostomo
    crysostomo
    Maximo VIP
    Maximo VIP

    Respeito às regras : Respeito às Regras 50%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1686
    Registrado : 23/01/2018

    [Resolvido]Espaço em Textbox Empty Re: [Resolvido]Espaço em Textbox

    Mensagem  crysostomo 4/12/2020, 17:43

    Amigo Boa tarde você tem que colocar em outro campo para ele ser liberado
    No evento ao abrir
    Código:
    Me.txt_cadastro.enabled=false
     ' ao abrir o formulário ele já vai ser bloqueado

    Código:
    If txt_nome <> null then
    Me.txt_cadastro.enabled=true ele quando o campo for digitado o txt_cadastro vai ser liberado
    Else.....


    .................................................................................
    Uma mão ajuda a outra.
    Feliz aquele que transfere o que sabe e aprende o que ensina.
    avatar
    crovador
    Novato
    Novato

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 23
    Registrado : 03/04/2018

    [Resolvido]Espaço em Textbox Empty Espaço em Textbox

    Mensagem  crovador 4/12/2020, 21:12

    Tranquilo guri, mas o problema é que quando o usuário digita um nome, Exemplo: "Antonio" ele colocola sem querer um espaço antes de digitar, eu queria bloquear o espaço e liberar somente depois que ele digitar um nome....

    agradeço sua ajuda.
    Acho que me expressei mal...

    aguardo sua resposta..
    Fica com Deus....
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2767
    Registrado : 22/11/2016

    [Resolvido]Espaço em Textbox Empty Re: [Resolvido]Espaço em Textbox

    Mensagem  DamascenoJr. 4/12/2020, 21:28

    Tópico movido da sala de consultas por não ter relação com este tipo de objeto. Atente-se a descrição de cada sala antes de abrir tópicos.


    .................................................................................
    Ajude-se a ser ajudado, anexe seu projeto.
    Sempre tente entender o código,
    não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2767
    Registrado : 22/11/2016

    [Resolvido]Espaço em Textbox Empty Re: [Resolvido]Espaço em Textbox

    Mensagem  DamascenoJr. 4/12/2020, 21:31

    O código deve estar no evento "ao alterar"
    If keycode = vbspace and nz(me.activecontrol.text) = vbnullstring then keycode = 0


    .................................................................................
    Ajude-se a ser ajudado, anexe seu projeto.
    Sempre tente entender o código,
    não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.
    crysostomo
    crysostomo
    Maximo VIP
    Maximo VIP

    Respeito às regras : Respeito às Regras 50%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1686
    Registrado : 23/01/2018

    [Resolvido]Espaço em Textbox Empty Re: [Resolvido]Espaço em Textbox

    Mensagem  crysostomo 4/12/2020, 22:34

    Código:
    no evento após atualizar
    Me.txt_cadastro= Replace(Me.txt_cadastro, " ", "")

     Aqui você pode deixar ele colocar o espaço que o sistema vai tirar  o espaço quando você for para outro campo


    Última edição por crysostomo em 4/12/2020, 23:04, editado 3 vez(es)


    .................................................................................
    Uma mão ajuda a outra.
    Feliz aquele que transfere o que sabe e aprende o que ensina.
    Nogaro513
    Nogaro513
    Avançado
    Avançado

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 482
    Registrado : 12/08/2013

    [Resolvido]Espaço em Textbox Empty tira espaço

    Mensagem  Nogaro513 4/12/2020, 22:41

    Antonio coloca este código no campo

    Private Sub seucampo_LostFocus()
    Me.seucampo = Trim(Me.seucampo)

    End Sub


    e testa ai abraço Nogaro
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2767
    Registrado : 22/11/2016

    [Resolvido]Espaço em Textbox Empty Re: [Resolvido]Espaço em Textbox

    Mensagem  DamascenoJr. 4/12/2020, 23:55

    Muitas dicas legais.

    Crysostomo, sua dica tira todos os espaços existentes. Creio não ser o que o Antônio quer.


    .................................................................................
    Ajude-se a ser ajudado, anexe seu projeto.
    Sempre tente entender o código,
    não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.

    crysostomo gosta desta mensagem

    avatar
    crovador
    Novato
    Novato

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 23
    Registrado : 03/04/2018

    [Resolvido]Espaço em Textbox Empty Espaço em Textbox

    Mensagem  crovador 5/12/2020, 10:28

    Amigos eu tentei colocar estes códigos, mais tem um deles que realmente tira todos os espaços e o outro não deu certo, agradeço a ajuda de vocês por me conceder atenção.
    Eu que usar o espaço, mas somente depois que o usuário digitar um nome se a textbox estiver em branco ele não pode dar espaço.
    Se tiver alguma outra ideia me judem...

    Deus abençoe...
    Nogaro513
    Nogaro513
    Avançado
    Avançado

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 482
    Registrado : 12/08/2013

    [Resolvido]Espaço em Textbox Empty exemplo tira espaço ao sair do campo

    Mensagem  Nogaro513 5/12/2020, 11:38

    verifique este exemplo
    Anexos
    [Resolvido]Espaço em Textbox AttachmentTira espaço ao sair do campo.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (24 Kb) Baixado 38 vez(es)
    avatar
    crovador
    Novato
    Novato

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 23
    Registrado : 03/04/2018

    [Resolvido]Espaço em Textbox Empty Espaço em Textbox

    Mensagem  crovador 5/12/2020, 11:54

    Deu certo amigo muito obrigado, Deus abençoe a todos pela atenção....

    crysostomo
    crysostomo
    Maximo VIP
    Maximo VIP

    Respeito às regras : Respeito às Regras 50%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1686
    Registrado : 23/01/2018

    [Resolvido]Espaço em Textbox Empty Re: [Resolvido]Espaço em Textbox

    Mensagem  crysostomo 5/12/2020, 12:06

    Sucesso na caminhada do sistema.
    Feche o tópico como resolvido.


    .................................................................................
    Uma mão ajuda a outra.
    Feliz aquele que transfere o que sabe e aprende o que ensina.
    avatar
    crovador
    Novato
    Novato

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 23
    Registrado : 03/04/2018

    [Resolvido]Espaço em Textbox Empty Espaço em Textbox

    Mensagem  crovador 7/12/2020, 17:13

    Obrigado a Todos pela força e fiquem com Deus....

    crysostomo gosta desta mensagem

    Nogaro513
    Nogaro513
    Avançado
    Avançado

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 482
    Registrado : 12/08/2013

    [Resolvido]Espaço em Textbox Empty Espaço em Textbox

    Mensagem  Nogaro513 7/12/2020, 17:53

    Bom que resolveu abraço !

    Conteúdo patrocinado

    [Resolvido]Espaço em Textbox Empty Re: [Resolvido]Espaço em Textbox

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 13/5/2021, 09:22