|
2008/08/12(Tue) 17:28:51 編集(投稿者)
??? 先ほどのコードでは一般の警告音は消音されなかったということでしょうか? テキストボックス内でEnterキーが押下された場合、警告音を消音、という記述なのですが…。
Private Sub TextBox1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles TextBox1.KeyDown If e.KeyCode = Keys.Enter Then [共通関数呼出] End If End Sub
Private Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress If e.KeyChar = Chr(Keys.Enter) Then 'Beep音を消音 e.Handled = True End If End Sub
上記のようにKeyPressイベントで本来の警告音を消音し、 Enterキー押下時の共通関数を呼び出す処理はKeyDownイベントで行ってみても駄目ですか?
|