Solved Sound in Access

[isladogs]

Just tested. The sound is less than 0.5 seconds.
This plays the sound once then shows the message

...
'sound code starts here
strSound = CurrentProject.Path & "\Sounds\potion_gulp.wav"
PlayWaveFile

Sleep 500 'pause 0.5 seconds
StopWaveFile

'msg box to say you have used a potion
MsgBox "You Have Just Used Gained 25 Hit Points", , "Potion Used"
...

 

[murray83]

Just tested. The sound is less than 0.5 seconds.
This plays the sound once then shows the message

...
'sound code starts here
strSound = CurrentProject.Path & "\Sounds\potion_gulp.wav"
PlayWaveFile

Sleep 500 'pause 0.5 seconds
StopWaveFile

'msg box to say you have used a potion
MsgBox "You Have Just Used Gained 25 Hit Points", , "Potion Used"
...

Cheers, but i think its my version of access which is being the pain, as if i leave as you have very kindly layed out then i get the message but no noise, but if I am to put a break in and step through it then it plays