enter 自動跳到下一個 tabindex

 Private Sub Txt_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Txt.KeyDown

 k = sender.tabindex

 NextControl(k)

End Sub

 Private Sub NextControl(ByVal ctrlTabIndex As Integer)

        For Each ctrl As Control In Me.Controls

            If (ctrl.TabIndex) = (ctrlTabIndex + 1) Then

                ctrl.Focus()

            End If

        Next

 End Sub