با استفاده از این Api و دادن مسیر فایل در File path می تونین هر فایل wav رو پخش کنید.


Declare Function PlaySound Lib "winmm.dll" Alias "PlaySoundA" (ByVal lpszName As String, ByVal hModule As Long, ByVal dwFlags As Long) As Long
Public Function Sound(pathfile As String)
    SoundPlay = PlaySound(pathfile, 0&, &H1)
End Function