Welcome to the new platform of Programmers Heaven! We apologize for the inconvenience caused, if you visited us from a broken link of the previous version. The main reason to move to a new platform is to provide more effective and collaborative experience to you all. Please feel free to experience the new platform and use it's exciting features. Contact us for any issue that you need to get clarified. We are more than happy to help you.
I trying to get this to work, but it stops before the end of the wav file. This is part of a larger program.
I used the same code for several shorter sound effects, ahead of ahead of this one, and those lines work just fine. This is the last line of the program. The wave file is about 9 seconds cut from the original wave file. I am using vb6.0 professional and windows xp. The sound module is as follows:
Public Declare Function sndPlaySound Lib "winmm.dll" Alias "sndPlaySoundA" (ByVal lpszSoundName As String, ByVal uFlags As Long) As Long
Private Sub Timer08_Timer() '500ms
Out 888, 176 'turn on automation
sndPlaySound App.Path & "Monster Mash.wav", SND_ASYNC
Out 888, 0 'turn off automation
Timer08.Enabled = False
Utimer01.Enabled = True