如何按enter键后移动输入焦点.txt

来自「以电子书的形式收集了VB一些常见问题解决方法,可以很方便的查找自己需要解决的问题」· 文本 代码 · 共 9 行

在 每 个 KeyPress事 件 中 输 入 如 下 代 码 ： 
     Private Sub Text1_KeyPress (KeyAscii As Integer) 
     If KeyAscii = 13 Then ' The ENTER key. 
     SendKeys "{tab}" ' Set the focus to the next control. 
     KeyAscii = 0 ' Ignore this key. 
     End If 
     End Sub 
<END>