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]Proper case em todos os campos texto do formulário

    avatar
    Edelson Vieira
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 198
    Registrado : 21/08/2015

    [Resolvido]Proper case em todos os campos texto do formulário Empty [Resolvido]Proper case em todos os campos texto do formulário

    Mensagem  Edelson Vieira em Ter 23 Abr 2019, 09:05

    Bom dia!

    Deus seja louvado.

    Preciso que todos os campos texto do formulário sejam convertidos para ProperCase. No evento após atualizar da textbox eu uso me.Activecontrol = strConv(me.ActiveControl, 3), e funciona, porém se eu tenho 30 campos texto em um formulário, eu tenho que colocar o evento em cada campo. Alguém saberia me dizer se existe uma forma de colocar a função direto no formulário para assumir todos os campos?
    crysostomo
    crysostomo
    VIP
    VIP

    Respeito às Regras 75%

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

    [Resolvido]Proper case em todos os campos texto do formulário Empty Re: [Resolvido]Proper case em todos os campos texto do formulário

    Mensagem  crysostomo em Ter 23 Abr 2019, 12:11

    eu mexo com Me.nome = StrConv(Me.nome, 3) no apos atualizar do formulario e não dos campo , mas tbm é a mesma coisa.
    pego carona com esse tópico


    .................................................................................
    Uma mão ajuda a outra.
    Feliz aquele que transfere o que sabe e aprende o que ensina.
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1148
    Registrado : 21/11/2016

    [Resolvido]Proper case em todos os campos texto do formulário Empty Re: [Resolvido]Proper case em todos os campos texto do formulário

    Mensagem  DamascenoJr. em Qua 24 Abr 2019, 22:08

    No evento Ao pressionar tecla do seu formulário insira o código

    Código:
    KeyAscii = Asc(UCase(Chr(KeyAscii)))

    Não esqueça de definir a propriedade Visualizar teclas que também está na guia de eventos da folha de propriedades do objeto formulário para o valor Sim


    .................................................................................
    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.
    avatar
    Edelson Vieira
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 198
    Registrado : 21/08/2015

    [Resolvido]Proper case em todos os campos texto do formulário Empty Re: [Resolvido]Proper case em todos os campos texto do formulário

    Mensagem  Edelson Vieira em Qui 25 Abr 2019, 08:58

    Bom dia IvanJr.
    Obrigado pela disponibilidade. UCase ficaria tudo em maiúsculas, porém eu quero somente a primeira letra de cada nome em maiúscula. A função que eu desejo é ProperCase e não UCase. Qual seria o código? Vlw
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1148
    Registrado : 21/11/2016

    [Resolvido]Proper case em todos os campos texto do formulário Empty Re: [Resolvido]Proper case em todos os campos texto do formulário

    Mensagem  DamascenoJr. em Qui 25 Abr 2019, 22:07

    Veja
    Anexos
    [Resolvido]Proper case em todos os campos texto do formulário AttachmentExemploD.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (39 Kb) Baixado 8 vez(es)


    .................................................................................
    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.
    avatar
    Edelson Vieira
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 198
    Registrado : 21/08/2015

    [Resolvido]Proper case em todos os campos texto do formulário Empty Re: [Resolvido]Proper case em todos os campos texto do formulário

    Mensagem  Edelson Vieira em Sex 26 Abr 2019, 11:16

    Boa tarde IvanJr.

    Se eu tiro o comentário da estrutura if somente a primeira caixa de texto funciona, a segunda não funciona.
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1148
    Registrado : 21/11/2016

    [Resolvido]Proper case em todos os campos texto do formulário Empty Re: [Resolvido]Proper case em todos os campos texto do formulário

    Mensagem  DamascenoJr. em Sex 26 Abr 2019, 21:03

    Como o comentário do código diz

    Código:
    'descomente a estrutura condicional para que
    'somente as caixas de texto com a tag com valor 1 fiquem em propercase

    [Resolvido]Proper case em todos os campos texto do formulário Ggghhh10

    basta na segunda caixa de texto inserir o valor 1 na propriedade Marca (Tag)


    .................................................................................
    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.
    avatar
    Edelson Vieira
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 198
    Registrado : 21/08/2015

    [Resolvido]Proper case em todos os campos texto do formulário Empty Re: [Resolvido]Proper case em todos os campos texto do formulário

    Mensagem  Edelson Vieira em Sab 27 Abr 2019, 09:44

    Bom dia!
    Valeu aí pela ajuda pessoal. O código do nobre colega IvanJr. é a solução. Obrigado, grande abraço.

    "DEUS SEJA LOUVADO"
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1148
    Registrado : 21/11/2016

    [Resolvido]Proper case em todos os campos texto do formulário Empty Re: [Resolvido]Proper case em todos os campos texto do formulário

    Mensagem  DamascenoJr. em Sab 27 Abr 2019, 15:10

    O fórum agradece o retorno. Sucesso.


    .................................................................................
    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.

    Conteúdo patrocinado

    [Resolvido]Proper case em todos os campos texto do formulário Empty Re: [Resolvido]Proper case em todos os campos texto do formulário

    Mensagem  Conteúdo patrocinado


      Data/hora atual: Sab 18 Jan 2020, 15:02