txtUserName.setFocus

YE,谢谢

多个文本框，如何实现，按回车键鼠标在文本框中依次移动？

private sub txtUserName_keydown()
if keycode =vbcrlf then
passworldtext.setfocus
end if
end sub

这个函数可以将回车键转换成Tab键。在每个文本框的KeyPress事件里面调用这个函数就可以了！
Public Sub KeyDown(KeyCode As Integer)
If KeyCode = vbKeyReturn Then
SendKeys "{tab}"
End If
End Sub

例如：
private sub text1_KeyPress(KeyAscii As Integer)
if KeyAscii =13 then
call KeyDown(KeyAscii )
end if
end sub

[此贴子已经被作者于2007-2-7 13:17:44编辑过]

用TAB健多好，设置TABINDEX属性

如果有Text、List等多个控件，使用tab或将回车转化成tab将使所有控件循环得到焦点。如果这只在Text控件中循环焦点，那该如何？tab不好使了。而且，别忘了控件为不能或不可见时，无法得到焦点。

焦点的问题
大多数控件都有TabStop和TabIndex两个属性,与TAB按键有关的,如果TabStop设置为TURE,则在运行的时候,TAB按键会移动到上面,即可以用TAB按键获得焦点,当设置为FLASE时,将不能通过TAB获得焦点,同时关于LOAD后焦点落在哪个控件上,先起作用的是TabStop属性只要有设置为TURE的,就不可能落到FLASE的上面,如果有几个都为TURE时,再看TABINDEX属性,焦点设置在小的上面,如果都是FLASH时,焦点落在TABINDEX最小的上面,TAB按键不起作用,当改变一个TABINDEX属性值时,其它的也会跟着变化,有规律,自己可以去试试,我就不说了

关于控件为不能或不可见时，无法得到焦点。这个我就没试了，我不在自己机上，没装VB