VB6 テキストとSetfocus

質問

今テキストボックスからテキストボックスへ
focusを写すのをやっていたのですが、
TEXT1　から　TEXT2へ入力した後エンターキーを押したらfocusを写すというのを設定したところ
ちゃんとカーソルは移動するのですが
どうしてもエラー音が出てしまいます。

現在KEYPRESSに
If KeyAscii = 13 Then
Text2.SetFocus
End If
このように書いているのですがなにか間違ってるのでしょうか？
エラー音を出さない方法をどなたかご教授ください

回答No.1

TAGOSAKU7

以前にHk2001さんがサンプルを載せています。

参考URLの＃２の発言

参考URL：

http://oshiete1.goo.ne.jp/kotaeru.php3?q=170905

お礼

教えてGOOというのはココのサイトの一部だったんですね。
初めて知りました。
こんどからは見てみることにします。