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 : 22/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 23/4/2019, 14: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
    Super Avançado
    Super Avançado

    Respeito às Regras 50%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 879
    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 23/4/2019, 17: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.
    IvanJr.
    IvanJr.
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 834
    Registrado : 22/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  IvanJr. em 25/4/2019, 03: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


    .................................................................................
    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 : 22/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 25/4/2019, 13: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
    IvanJr.
    IvanJr.
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 834
    Registrado : 22/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  IvanJr. em 26/4/2019, 03: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)


    .................................................................................
    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 : 22/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 26/4/2019, 16: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.
    IvanJr.
    IvanJr.
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 834
    Registrado : 22/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  IvanJr. em 27/4/2019, 02: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)


    .................................................................................
    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 : 22/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 27/4/2019, 14: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"
    IvanJr.
    IvanJr.
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 834
    Registrado : 22/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  IvanJr. em 27/4/2019, 20:10

    O fórum agradece o retorno. Sucesso.


    .................................................................................
    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: 22/8/2019, 06:33