PROBLEMA AO DIGITAR EM TEXTBOX
ai vc tem algum e1/2 que posso te passar, está dando erro no formato de arquivo rar
Em vez de .RAR, coloca .ZIP e anexa ae.
ELMO01, boa noite.
O que esta jogando o cursor para o final está exatamente neste código, é a linha em negrito
Porque que isto ocorre:
A função SelStart diz que é para ser iniciada a digitação em.....
neste caso Len faz a contagem de tudo que esta na TextBox e diz para o cursos se posicionar no final da contagem, ok??
A property CHANGE do objeto TextBox é ativada toda vez que você digita alguma informação nela, por isso você pode posicionar o cursor onde quiser que sempre apos a digitação do caracter ele sempre vai posionar o cursor no final do conteúdo da TextBox.
Resolução do seu Problema
De duplo clique no formulario e selecione o envento KeyPress do formulario
Coloque e coloque o código abaixo:
Agora selecione a propriedade KeyPreviw e marque para true..
Ok. Rode seu projeto e veja se agora funciona.....
Qualquer dúvida poste novamente....
O que esta jogando o cursor para o final está exatamente neste código, é a linha em negrito
Private Sub Txt_AluNom_Change()
Txt_AluNom.Text = UCase(Txt_AluNom.Text)
Txt_AluNom.SelStart = Len(Txt_AluNom.Text)
End SubPorque que isto ocorre:
A função SelStart diz que é para ser iniciada a digitação em.....
neste caso Len faz a contagem de tudo que esta na TextBox e diz para o cursos se posicionar no final da contagem, ok??
A property CHANGE do objeto TextBox é ativada toda vez que você digita alguma informação nela, por isso você pode posicionar o cursor onde quiser que sempre apos a digitação do caracter ele sempre vai posionar o cursor no final do conteúdo da TextBox.
Resolução do seu Problema
De duplo clique no formulario e selecione o envento KeyPress do formulario
Private Sub Form_KeyPress(KeyAscii As Integer)
End SubColoque e coloque o código abaixo:
KeyAscii = Asc(UCase(Chr(KeyAscii)))
Agora selecione a propriedade KeyPreviw e marque para true..
Ok. Rode seu projeto e veja se agora funciona.....
Qualquer dúvida poste novamente....
Há eu ia me esquecendo...
Apague o código colocado no envento Change da TextBox...
E quando você colocar o código da digitação sempre maiúscula no KeyPress do formulario ele é aplicado em todos os textbox do formulario, ok???
Apague o código colocado no envento Change da TextBox...
E quando você colocar o código da digitação sempre maiúscula no KeyPress do formulario ele é aplicado em todos os textbox do formulario, ok???
Danikull - muito obrigado pela dica - deu certo e agradeço a todos que participaram também, sem vcs não conseguiria sozinho acertar este problema, pois estou iniciando neste tipo de programação, tenho experiência em programa de MS-DOS como o bom e velho CLIPPER, mas ferramentas novas, tenho alguma dificuldade, por isto conto com a ajuda de vcs.
Muito Obrigado - AMIGOS
Muito Obrigado - AMIGOS
Tópico encerrado , respostas não são mais permitidas