１．Control.Focus メソッド を使った方法

Private Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As _
                System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress
'Control.Focus メソッド を使った方法
    If e.KeyChar = Microsoft.VisualBasic.ChrW(13) Then 'Enter キーが押された事を取得
        e.Handled = True    'KeyPress イベントをキャンセル(Beep 音を消音に)
        TextBox2.Focus()    'TextBox2 に入力フォーカスを設定
    End If
End Sub

Private Sub TextBox2_KeyPress(ByVal sender As Object, ByVal e As _
                System.Windows.Forms.KeyPressEventArgs) Handles TextBox2.KeyPress
    If e.KeyChar = Microsoft.VisualBasic.ChrW(13) Then
        e.Handled = True
        TextBox3.Focus()
    End If
End Sub