VB.NETでBEEP音を鳴らすには

解決


ヤヤ  2004-12-02 09:57:27  No: 87081  IP: [192.*.*.*]

VB.NETでBEEP音を鳴らしたいのですが・・?
何かヒントを教えて下さい

編集 削除
花ちゃん  2004-12-02 11:36:36  No: 87082  IP: [192.*.*.*]

下記では。
http://www.bcap.co.jp/hanafusa/dotnet/sound01.htm

編集 削除
ヤヤ  2004-12-02 12:35:42  No: 87083  IP: [192.*.*.*]

やってみたのですが・・・・鳴りません
コンパネ、スピーカの設定も確認したのですが・・
Windowsの警告音は正常に鳴るのですが・・・

編集 削除
花ちゃん  2004-12-02 13:05:02  No: 87084  IP: [192.*.*.*]

>やってみたのですが・・・・鳴りません
テキストボックス上で Enter キーを押した時も鳴らないのでしょうか?

編集 削除
ヤヤ  2004-12-02 15:09:28  No: 87085  IP: [192.*.*.*]

テキストボックス上でenterキーを押した時は鳴るのですが・・・
例えば入力された値がAが入力された時に鳴らせるとダメなんです・・
ex.
IF ME.識別.TEXT="A" then
   FOR I=0 TO 50
     BEEP()
     Microsoft.VisualBasic.Beep()
   NEXT I
END IF

編集 削除
ヤヤ  2004-12-02 16:02:25  No: 87086  IP: [192.*.*.*]

すみません!私の勘違いでした・・
テキストボックスでenterキーが入力された時も鳴って、BEPPでも鳴っていました。
でも、これだと他のテキストボックスでenterキーが押されても鳴りますよネ!
私がしたいのは、テキストボックスで何か入力された値が間違っている時だけに
オペレータに通知の意味で鳴らしたいのです。
enterキーが入力された時には鳴らさず、入力値が間違った時だけ鳴らしたいのです
すみません  説明が足りずに・・

編集 削除
花ちゃん  2004-12-02 16:33:23  No: 87087  IP: [192.*.*.*]

>enterキーが入力された時には鳴らさず、

下記を試して見て下さい。

    Private Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As _
                    System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress
        If e.KeyChar = Microsoft.VisualBasic.ChrW(13) Then
            e.Handled = True    
        End If
    End Sub

編集 削除
ヤヤ  2004-12-02 16:52:25  No: 87088  IP: [192.*.*.*]

はい!解決しました
有難うございました(~L~)
花ちゃんの今後のご活躍をお祈りしています。
わたしも頑張りマス!

編集 削除
ヤヤ  2004-12-03 12:38:40  No: 87089  IP: [192.*.*.*]

解決チェックを忘れていましたスミマセン

編集 削除