PRESSIONAR ENTER
Boa tarde pessoal,
Estou fazendo um programa bem simples para imprimir um requerimento.
e gostaria de pressionar enter e o cursor mudar de um campo para outro.
Ja coloquei desta forma e não funciona
Private Sub frmprincipal_KeyPress(ByVal sender As System.Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles MyBase.KeyDown
Dim nKey As Long
nKey = e.KeyValue
Select Case nKey
Case Is = 13
e.Handled = True
SendKeys.Send(TAB)
Case Is = 27
e.Handled = True
Close()
End Select
End Sub
o que devo fazer
Estou fazendo um programa bem simples para imprimir um requerimento.
e gostaria de pressionar enter e o cursor mudar de um campo para outro.
Ja coloquei desta forma e não funciona
Private Sub frmprincipal_KeyPress(ByVal sender As System.Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles MyBase.KeyDown
Dim nKey As Long
nKey = e.KeyValue
Select Case nKey
Case Is = 13
e.Handled = True
SendKeys.Send(TAB)
Case Is = 27
e.Handled = True
Close()
End Select
End Sub
o que devo fazer
SendKeys.Send([txt-color=#e80000][Ô]{TAB}[Ô][/txt-color])
Tópico encerrado , respostas não são mais permitidas