# 换个方法做吧！

Posted by 小吴 on October 03, 1997 at 00:29:00:

In Reply to: Text Control 自动换行 posted by 小贤 on October 02, 1997 at 03:33:39:

如果你就只有这５个 textbox 在做 focus 移转的话，你不应该将处理程式放在 Form 的 KeyDown 事件中，应该是在 Text1 的 KeyPress 中处理。如下面的程式所示，这样我试过，没有问题。

Private Sub Text1_KeyPress(Index As Integer, KeyAscii As Integer)
If KeyAscii = 13 Then
KeyAscii = 0
If Index = 4 Then ' 最后一个 text box
Save
Else
Text1((Index + 1) Mod 5).SetFocus
End If
End If
End Sub

Follow Ups:

- Re: 换个方法做吧！ 小贤 02:25:39 10/03/97 (3)
  - 写在 KeyPress 而不是 KeyDown 小吴 18:05:38 10/05/97 (2)
    - Re: 写在 KeyPress 而不是 KeyDown 小贤 01:56:41 10/08/97 (1)
      - 你又没说 小吴 03:47:30 10/09/97 (0)