Beep on PC speaker

[viktorm]

How to make PC beep on it's PC speaker instead on the sound card.

[Cimperiali]

try:
private sub mybeep
beep
end sub


Special thanks to Lothar "the Great" Haensler. Come back soon, you Guru.

[viktorm]

As I said this will go on a sound card if it's installed. I want my beep goes on PC speaker at any case (sound card on or not).

[Cimperiali]

Sorry. As usual, I mismatched the point, and I am afraid I do not know how to do it...

Special thanks to Lothar "the Great" Haensler. Come back soon, you Guru.

[TH1]

If you use the API it should use the speakers

private Declare Function Beep Lib "kernel32" (byval dwFreq as Long, byval dwDuration as Long) as Long
private Sub Command1_Click()
Beep 100, 500
End Sub

[Cimperiali]

Great. Get a rate tomorrow!
Cesare Imperiali

Special thanks to Lothar "the Great" Haensler. Come back soon, you Guru.