Beep() not making a sound-how to fix?

[Rich]

Hello,

I want to use the Beep() to alert users about certain
messages but in my workstation I can't get a sound out of
it. But Beep works in VB6. What do I need to do?

Sub...
....
Beep()
For i = 0 to 100: Beep(): Next
MsgBox "testing"
....

No sound. Is it my workstation or do I need to do
something else?

Thanks,
Rich

[Abubakar]

well I usually use the Beep api:

Declare Function Beep Lib "kernel32.dll" Alias "Beep" (ByVal freq As
Integer, ByVal duration As Integer) As Boolean


"Rich" <an*******@discussions.microsoft.com> wrote in message
news:e0****************************@phx.gbl...

Hello,

I want to use the Beep() to alert users about certain
messages but in my workstation I can't get a sound out of
it. But Beep works in VB6. What do I need to do?

Sub...
...
Beep()
For i = 0 to 100: Beep(): Next
MsgBox "testing"
...

No sound. Is it my workstation or do I need to do
something else?

Thanks,
Rich

[Rich]

I got build errors with this API. May I ask how you
invoke it? I placed a call in a button click event but
got the blue scwigly line.

Sub button1...
Call Beep()
End Sub

-----Original Message-----
well I usually use the Beep api:

Declare Function Beep Lib "kernel32.dll" Alias "Beep" (ByVal freq AsInteger, ByVal duration As Integer) As Boolean


"Rich" <an*******@discussions.microsoft.com> wrote in messagenews:e0****************************@phx.gbl...

Hello,

I want to use the Beep() to alert users about certain
messages but in my workstation I can't get a sound out of it. But Beep works in VB6. What do I need to do?

Sub...
...
Beep()
For i = 0 to 100: Beep(): Next
MsgBox "testing"
...

No sound. Is it my workstation or do I need to do
something else?

Thanks,
Rich

.

[Abubakar]

oops I forgot,,, u need:

Imports System.Runtime.InteropServices


"Rich" <an*******@discussions.microsoft.com> wrote in message
news:dd****************************@phx.gbl...

I got build errors with this API. May I ask how you
invoke it? I placed a call in a button click event but
got the blue scwigly line.

Sub button1...
Call Beep()
End Sub

-----Original Message-----
well I usually use the Beep api:

Declare Function Beep Lib "kernel32.dll" Alias "Beep"

(ByVal freq As

Integer, ByVal duration As Integer) As Boolean


"Rich" <an*******@discussions.microsoft.com> wrote in

message

news:e0****************************@phx.gbl...

Hello,

I want to use the Beep() to alert users about certain
messages but in my workstation I can't get a sound out of it. But Beep works in VB6. What do I need to do?

Sub...
...
Beep()
For i = 0 to 100: Beep(): Next
MsgBox "testing"
...

No sound. Is it my workstation or do I need to do
something else?

Thanks,
Rich

.

[Rich]

Thank you. I will give that a try.

-----Original Message-----
oops I forgot,,, u need:

Imports System.Runtime.InteropServices


"Rich" <an*******@discussions.microsoft.com> wrote in messagenews:dd****************************@phx.gbl...

I got build errors with this API. May I ask how you
invoke it? I placed a call in a button click event but
got the blue scwigly line.

Sub button1...
Call Beep()
End Sub

>-----Original Message-----
>well I usually use the Beep api:
>
>Declare Function Beep Lib "kernel32.dll" Alias "Beep"

(ByVal freq As

>Integer, ByVal duration As Integer) As Boolean
>
>
>
>
>"Rich" <an*******@discussions.microsoft.com> wrote in

message

>news:e0****************************@phx.gbl...
>> Hello,
>>
>> I want to use the Beep() to alert users about certain
>> messages but in my workstation I can't get a sound

out of

>> it. But Beep works in VB6. What do I need to do?
>>
>> Sub...
>> ...
>> Beep()
>> For i = 0 to 100: Beep(): Next
>> MsgBox "testing"
>> ...
>>
>> No sound. Is it my workstation or do I need to do
>> something else?
>>
>> Thanks,
>> Rich
>
>
>.
>

.