Private Sub Textbox_Keydown(ByVal sender As Object, ByVal e As _
      System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress, _
      TextBox2.KeyPress, TextBox3.KeyPress, TextBox4.KeyPress, _
      TextBox5.KeyPress, TextBox6.KeyPress
        If e.KeyChar = ControlChars.Cr Then ' wenn Eingabetaste (Returntaste) 
            ' gedrückt wird
            Me.SelectNextControl(Me.ActiveControl, True, False, _
              True, True) ' zur nächsten Textbox
            e.Handled = True 'ohne beep-Ton
        End If
    End Sub