- 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.
Postado : 27/03/2016 7:36 pm