Foco Na Próxima Textbox

[Gabriel Cabral]

Ola pessoal

estou com uma duvida que aparentemente deve ser simples.....

tenho uma textbox para digitar algo com um numero determinado de caracteres....um CEP por exemplo...

então gostaria de ao terminar de digitar os 9 caracteres do CEP, o foco mudar automaticamente para a proxima textbox

tem como???

obrigado

[Guest --Rafael --]

Propriedade: Tabindex

[Gabriel Cabral]

Propriedade: Tabindex

Então Rafael, eu qria que o foco mudasse sem eu ter que dar Tab ou Enter

é usando o Tabindex mesmo????

onde eu uso essa propriedade??

tentei aqui dessa forma....

If Len(txtAtend_Inicio) = 5 Then
txtAtend_Termino.TabIndex
End If

mas não consegui

[kuroi]

acho que você pode fazer assim:

Private Sub Text1_Change()
    If Text1.SelStart = 9 Then SendKeys "{TAB}"
End Sub[/code]
onde 9 é o numero de caracteres que vao caber na textbox. pra facilitar você pode por o MaxLength no lugar.
tipo, usando o selstart você so vai mudar o foco quando ele digitar o caracter da ultima posicao. não sei se seria melhor assim, ou se seria melhor usando o len() que faria com que ele mudasse o foco sempre que o textbox atingisse 9 posicoes, veja o que você acha melhor.

[Gabriel Cabral]

Valeu KUROI, usei o que você me passou...deu certinho

muito obrigado

[Gabriel Cabral]

ah KUROI

e se eu kiser que o foco vá para um botao ou textbox que não seja o proximo TabIndex??

o que devo usar??

[kuroi]

ah KUROI

e se eu kiser que o foco vá para um botao ou textbox que não seja o proximo TabIndex??

o que devo usar??

Private Sub Text1_Change()
    If Text1.SelStart = 9 Then NomeDoTextBox.SetFocus
End Sub[/code]

[Gabriel Cabral]

ah KUROI

e se eu kiser que o foco vá para um botao ou textbox que não seja o proximo TabIndex??

o que devo usar??

Private Sub Text1_Change()
    If Text1.SelStart = 9 Then NomeDoTextBox.SetFocus
End Sub

ah é mesmo KUROI....bem lembrado :P

muito obrigado