• Revista PROGRAMAR: Já está disponível a edição #53 da revista programar. Faz já o download aqui!

programadorvb6

Como pular textbox sem usar o SendKeys

4 mensagens neste tópico

Olá boa tarde a todos programo em vb6 há já algum tempo, mas com estas coisas da Microsoft em mudar para o Vista , fiquei com este problema, é que o SendKeys faz-me falta para enviar dados para as Textbox, e não encontro maneira de o fazer , porque quero compatibilizar todas as minhas aplicações também para o vista.

alguém me pode ajudar ?

grato

programadorvb6

até +

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Pular ?

Saltar para essa caixa

Se é isso fazes

if TextBox1.Enabled then

  if TextBox1.Visible then

    Textbox1.setFocus()

  end if

end if

TextBox1 é o nome da caixa

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Não dá pois o queria tambem paraoutra aplicação conjunta..

O que eu quero dizer com pular é o mesmo efeito que faz a tecla Tab

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Entao fazes um metodo

Sub MoveToTextBox( ByRef newTextBox as TextBox )  

if newTextBox.Enabled then
   if newTextBox.Visible then
     newTextBox.setFocus()
   end if
end if

End Sub

E utilizas num modulo ou numa classe que partilhes nas diferentes aplicações

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Crie uma conta ou ligue-se para comentar

Só membros podem comentar

Criar nova conta

Registe para ter uma conta na nossa comunidade. É fácil!


Registar nova conta

Entra

Já tem conta? Inicie sessão aqui.


Entrar Agora