>>277
ありがとうございました。
text1からtext2に移動させるとしたら、これで良いのでしょうか?
とりあえずはうまくいったのですが.....

Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
KeyAscii = 0
Text2.SetFocus
End If
End Sub

それと、色々調べてる時にEnterキー移動はあまりお勧めできない
って書いてあったりするのですが、何か問題があるのでしょうか?
もしよろしければ教えていただけませんか?