RE:de un textbox a otro
Publicado por
Lachicayeye (1 intervención) el 29/07/2007 23:35:29
De un textbox a otro:
Private Sub TextBox1_KeyUp(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles TextBox2.KeyUp
If e.KeyCode = Keys.Enter Then
textbox2.Focus()
End If
End Sub
---------
Para verificar solo nros:
Private Sub TextBox1_KeyUp(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles TextBox2.KeyUp
If e.KeyCode = Keys.Enter Then
If IsNumeric(TextBox1.Text) Then
textbox2.Focus()
Else
TextBox1.Text = ""
TextBox1.Focus()
End If
End Sub
Si keres k sean solo letras, lo mismo pero al revez
Private Sub TextBox1_KeyUp(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles TextBox2.KeyUp
If e.KeyCode = Keys.Enter Then
If IsNumeric(TextBox1.Text) Then
textbox1.text=""
textbox1.Focus()
Else
TextBox2.Focus()
End If
End sub
saludos!