Upper Case?!!?!?!?!?!

[Lúcio Jr 0]

Bom dia, Pessoal. Tenho um campo que é UpperCase, entretanto se alguém digitar algo em um arquivo texto em caixa baixa e usar o famoso Ctrl+C/Ctrl+V, por exemplo, o campo aceita o texto. Tentei colocar no evento LostFocus do campo a função Format(txt_campo.text, Ucase), mas não adianta. Alguém tem alguma idéia?Aguardo e obrigado!!!

[Dennys Lopes 0]

Tente isso:Private Sub Text1_Change()Text1 = UCase(Text1)End Sub

[Lúcio Jr 0]

Deu certo, cara...obrigadoAbraço