- 21 Mar 2016 às 22:03
#8887
- Olá a todos.
Estou com um problema que não consigo resolver.
Tenho um formulário com diversos TextBox. Um dos TextBox, TextBox4, é numérico e serve de controle para diversas situações. Tudo está funcionando.
Resolvi fazer um controle mais rigoroso e queria usar o conteúdo do TextBox4 como indexador.
Exemplo: TextBox(TextBox4).SetFocus, quando TextBox4 for igual a 5 ir para o TextBox5. Não funcionou. Já tentei usar uma variável como TextBox(A).SetFocus e outros recursos e não funcionou.
A rotina que pensei seria assim:
Private Sub TextBox12_Change()
Dim A As integer
A = TextBox4
If TextBox4 < 7 Then
TextBox(A).SetFocus '<= se A=5 seria TextBox5.SetFocus
End If
End Sub
Tem como fazer isso?
Abs.
Estou com um problema que não consigo resolver.
Tenho um formulário com diversos TextBox. Um dos TextBox, TextBox4, é numérico e serve de controle para diversas situações. Tudo está funcionando.
Resolvi fazer um controle mais rigoroso e queria usar o conteúdo do TextBox4 como indexador.
Exemplo: TextBox(TextBox4).SetFocus, quando TextBox4 for igual a 5 ir para o TextBox5. Não funcionou. Já tentei usar uma variável como TextBox(A).SetFocus e outros recursos e não funcionou.
A rotina que pensei seria assim:
Private Sub TextBox12_Change()
Dim A As integer
A = TextBox4
If TextBox4 < 7 Then
TextBox(A).SetFocus '<= se A=5 seria TextBox5.SetFocus
End If
End Sub
Tem como fazer isso?
Abs.
Editado pela última vez por Kledison em 21 Mar 2016 às 22:10, em um total de 1 vez.
Razão: Retirei a palavra AJUDA do Título. Regra nº 2B: Não utilize textos como "AJUDA", "HELP", "DÚVIDA", "URGENTE" ou similares nos títulos. O título deve ser condizente com o conteúdo da sua pergunta.
