利用Enter鍵，移至下個欄位。(TabIndex)

    Private Sub TextBox2_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles TextBox2.KeyDown
        If e.KeyCode = 13 Then
            My.Computer.Keyboard.SendKeys("{TAB}", True)
        End If
    End Sub

(TabIndex)