类型：转载 责任编辑：asp.net 日期：2007/05/23
热门软件下载：
当按下回车键后怎样设置使焦点在一组文本框中循环切换。
网友回答：
Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = 13 Then
Text2.SetFocus
Text2.SelStart = 0
Text2.SelLength = Len(Text2)
End If
End Sub
Private Sub Text2_KeyDown(KeyCode As Integer, Shift As Integer)
if keycode=vbkeyup then text1.setfocus
if keycode=vbkeyreturn or keycode=vbkeydown then text3.setfocus
end sub