API playSound
aunque por ahi en internet hay un ocx de la api listo para reproducir wav o mid
Aunque yo, cuando los sonidos seran pre-establecidos y no se pueden cambiar prefiero usar el control ocx del reproductor de flash, asi creo con el swish un swf de flas con los sonidos a tocar y se pueden detener, entre otras cosas.
Hace poco hice una enciclopedia en Visual Basic y toda la multimedia esta en Flash (hecho con Swish).
------------------------------------------------------------------------
API - Sacado de http://www.geocities.com/siliconvalley/grid/2877/vb.htm
*** En un módulo:
Public Declare Function sndPlaySound Lib "winmm.dll" _
Alias "sndPlaySoundA" (ByVal lpszSoundName As String, _
ByVal uFlags As Long) As Long
Public Const SND_LOOP = &H8
Public Const SND_NODEFAULT = &H2
Public Const SND_SYNC = &H0
Public Const SND_ASYNC = &H1
Public Function PlaySound (FileName As String, F As Long) As Long
PlaySound = sndPlaySound (FileName, F)
End Function
'***Y para llamarla:
PlaySound "C:\Windows\Media\Ding.wav", SND_ASYNC ' por ejemplo
--------------------------------------------------------------