vb作成したらでbeep音が鳴ります。経験あるかたお願いします。

KeyPressイベントを追加して、データ入力後にエンターキーを押すとbeep音が鳴ります。ほかではescキーも鳴りますが、その他は鳴らないで動くようです。
単純に新規作成から、Form1へtestテキストコントロールを追加して、以下の記述をしただけなのですが、どうしてなるのか原因がわかりません。

Private Sub test_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
test.text="ok"
End If
End Sub　←この次でbeep音！

環境はvb6.0、windows2000。
仕様なのでしょうか？
ハード側の問題なのでしょうか？
経験あるかた宜しくお願い致します。

No.1 ベストアンサー 回答者： TAGOSAKU7 回答日時： 2003/03/15 21:18

TAB/ENTER/ESCAPEキーは殺しましょうw

Private Sub test_KeyPress(KeyAscii As Integer)
　　Select Case KeyAscii
　　　　Case vbKeyReturn, vbKeyEscape, vbKeyTab
　　　　Case Else
　　　　　　Exit Sub
　　End Select
　　If KeyAscii = 13 Then
　　　　test.Text = "ok"
　　End If
　　KeyAscii = 0
End Sub

この回答へのお礼

ベストな回答ありがとうございます。

お礼日時：2003/03/15 21:40