VBのBEEP音について。


[コメントツリー表示を見る] [発言時刻順表示を見る]

Posted by コウ on 2000/06/13 20:11:30

    はじめまして、こんばんわ。

    ちょっと御知恵を拝借したいです。
    WinNT上でのVB6でボタンが押されるまで
    BEEP音を鳴らしたいのですが、
    LOOPを使わずに制御する方法ってありますか?

    他のLOOPでタイマーではポートで通信の制御をしている為、

    Do
    If bFlg Then
    Beep &HE20, 100
    Else
    Sleep 2
    End If
    bFlg = Not bFlg
    DoEvents
    If mCANCEL Then Exit Do
    Loop

    こういうのは避けたいです。
    VB3では、
    OUT &H37, 6
    というQuickPakというソフトの関数で
    I/Oポートにデータを書き込んで鳴らせるようです。
    VB6ではサポートしていないので、この方法も出来ません。

    他に制御の方法がわかる方、ぜひ教えて下さい。
    宜しくお願いします。


記事スレッド一覧