はじめまして、こんばんわ。
ちょっと御知恵を拝借したいです。 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ではサポートしていないので、この方法も出来ません。
他に制御の方法がわかる方、ぜひ教えて下さい。 宜しくお願いします。
|