ÔÚ Ã¿ ¸ö 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>     
