按Enter键，使光标自动移到下一控件，怎么实现？(有文本控件的)

按Enter键，使光标自动移到下一控件，如何实现？(有文本控件的)
我的窗体里有三种控件,

1 文本控件组从Text1(0).到Text1(2).用下面这段代码只要在文本框内输入一个字符就会跳到下一文本框内,要用哪个事件??'
2 有一些复选框数组,好象按TAB键能自动跳到下一按钮上来,但就不能跳到文本框内(文本框在复选框前面)
3 有一个MSFlexGrid 控件,我单击这个MSFlexGrid控件只能选中第1列其它列都不能选中一样,点中了光标也会跳到第一列这个是哪里取消这种设置呀???

VB code

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
   If KeyCode = 13 Then
      SendKeys "{tab}+{home}"
   End If
End Sub
Private Sub Form_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
        SendKeys Chr$(9), True
End If
End Sub

Private Sub Form_Load()
   Me.Top = 50
   Me.Left = 50
   Option1(2).Value = True
   Me.KeyPreview = True
End Sub

Private Sub Text1_KeyDown(Index As Integer)  '用这段代码只要在文本框内输入一个字符就会跳到下一文本框内,要用哪个事件??'
  If KeyCode = 13 Then
     Text1(0).SetFocus
Else
    If Index <> 2 Then
       Text1(Index + 1).SetFocus
    End If
End If
 
End Sub

------解决方案--------------------

VB code

Private Sub Text1_KeyDown(Index As Integer, KeyCode As Integer, Shift As Integer)

End Sub

------解决方案--------------------

探讨

引用:
VB code
Private Sub Text1_KeyDown(Index As Integer, KeyCode As Integer, Shift As Integer)

End Sub

'还是只要在前两个任意文本框内输入一个字符就会跳到下一文本框内,为何??是不是事件错误了....能否给一个OK的代码来试验一下???……

按Enter键，使光标自动移到下一控件，怎么实现？(有文本控件的)

相关推荐