同志们好！
如何使光标回车移动到下一个文本框内时，使光标全部选中文本框内原有的内容，而不是一小竖道？以便于修改数据！
请帮忙修改一下如下：谢谢！
Sub Text1_KeyPress(KeyAscii As Integer) '将光标移动到下一个文本框
If KeyAscii = 13 Then
SendKeys "{Tab}"
KeyAscii = 0
End If
End Sub

版主大人：你好！您的控件代码如何写入呀？还要定义Handle吧。请具体指教，谢谢！

“焦点转入下一控件的代码
SendMessage(Handle,WM_NEXTDLGCTL,0,0)”

谢谢不惑的回复！你的方法好像不支持回车进入下一个文本……。

是的我是按如下更改的，谢谢！可是按如下又有别的问题了，如我只想修改文本框内的其中一个字或一个字符，如下的方法却将文本框内的所有内容全删了。哈哈！请教此问题如何解决？


Sub Text1_KeyPress(KeyAscii As Integer) '将光标移动到下一个文本框
Text1.SelStart = 0
Text1.SelLength = Len(Text1.Text)
If KeyAscii = 13 Then
SendKeys "{Tab}"
KeyAscii = 0
End If
End Sub

笨！我再试试。谢了