Question

VB中用TAB切换到下一个文本框

设了多个TEXT 怎么才能按TAB键或回车键 切换到下一个TEXT 要 代码

Answer 1

1.界面上的每个控件都有一个编号（TabIndex），当按Tab切换的时候就是根据这个TabIndex顺序，所以设置控件的TabIndex属性，即可得到你想要的Tab切换顺序。

2.按“回车键”切换则需要编辑代码了，我这里建议你将Text做成控件数组，这样会方便许多。

以下代码，可以通过按“回车键”实现向下切换控件数组中的控件。
Private Sub Text1_KeyDown(Index As Integer, KeyCode As Integer, Shift As Integer)

If Index < 2 And KeyCode = vbKeyReturn Then Text1(Index + 1).SetFocus

End Sub

Answer 2

设置文本框的TabIndex属性，按Tab键时，以TabIndex属性的值从小到大的顺序切换

如果想按回车后使另一个文本框得到焦点，就用以下代码
private sub text1_keypress(KeyAscii as integer)
if keyascii =13 then
text2.setfocus
end if
end sub

Answer 3

例：添加三个文件框，分别为：text1(0)，text1(1)，text1(2)，按TAB或回车，三个文本框可以依次得到输入焦点。
Private Sub Text1_KeyPress(Index As Integer, KeyAscii As Integer)
If KeyAscii = 13 Then
If Index = 2 Then
Index = 0
Else
Index = Index + 1
End If
Text1(Index).SetFocus
End If
End Sub

Answer 4

不用代码
tab自动跳到下一个
比如焦点在text1,按tab,焦点就成了text2

Answer 5

Private Sub Form_GotFocus()
Text1.Text = Text1.SetFocus
End Sub