You might want to try the Multimedia Control, or use the winAPI of the mciSendCommand() API, which is:
Code:
Public Declare Function mciSendCommand Lib "winmm.dll" Alias "mciSendCommandA" (ByVal wDeviceID As Long, ByVal uMessage As Long, ByVal dwParam1 As Long, ByVal dwParam2 As Any) As Long
Sub Playsnd(ByVal file as String)
mciSendString("close all", 0, 0, 0)
mciSendString("open " & file & " type Other alias background", 0, 0, 0)
mciSendString("play background", 0, 0, Form1.hWnd)
End Sub
Commands that you can use:
MCI_BREAK
MCI_CAPTURE
MCI_CLOSE
MCI_CONFIGURE
MCI_COPY
MCI_CUE
MCI_CUT
MCI_DELETE
MCI_ESCAPE
MCI_FREEZE
MCI_GETDEVCAPS
MCI_INDEX
MCI_INFO
MCI_LIST
MCI_LOAD
MCI_MARK
MCI_MONITOR
MCI_OPEN
MCI_PASTE
MCI_PAUSE
MCI_PLAY
MCI_PUT
MCI_QUALITY
MCI_REALIZE
MCI_RECORD
MCI_RESERVE
MCI_RESTORE
MCI_RESUME
MCI_SAVE
MCI_SEEK
MCI_SET
MCI_SETAUDIO
MCI_SETTIMECODE
MCI_SETTUNER
MCI_SETVIDEO
MCI_SIGNAL
MCI_SPIN
MCI_STATUS
MCI_STEP
MCI_STOP
MCI_SYSINFO
MCI_UNDO
MCI_UNFREEZE
MCI_UPDATE
MCI_WHERE
MCI_WINDOW