Sorry...
I forgot to save that after i fixed it...
Change :
code:
Public Declare Function PlaySound Lib "winmm.dll" Alias "PlaySoundA" (ByVal lpszName As String, ByVal hModule As Long, ByVal dwFlags As Long) As Long
to:
code:
Private Declare Function PlaySound Lib "winmm.dll" Alias "PlaySoundA" (ByVal lpszName As String, ByVal hModule As Long, ByVal dwFlags As Long) As Long
It should work
If you cant locate this piece of code its in Sample.cls (you'll see it as "SoundPlug" in vb) at almost top of the code...