'h' - 'e'- on hockey stick - and a 'p'

[Sacofjoea]

WHen I use this to play a .wav it stops the actions in the form, how could I make the .wav play, and still have the stuff in the form move?

Option Explicit

Private Declare Function PlaySound Lib "winmm.dll" Alias "PlaySoundA" (ByVal lpszName As String, ByVal hModule As Long, ByVal dwFlags As Long) As Long
Private Const SND_FILENAME = &H20000 ' name is a file name
Private Const SND_ASYNC = &H1 ' play asynchronously
Private Const SND_SYNC = &H0


Private Sub Play_Sound_Click()
PlaySound App.Path & "\ILOVEYOUVIRUS.wav.vbs.mp3.wav.vbs.jpg.wav", 0, SND_SYNC
End Sub