Visual Basic - Ejecutar un archivo de sonido

Hola!!!

Necesito saber como puedo hacer un código fuentes en el evento click de un boton que me ejecute un archivo .wav,

Gracias!!

Hacer sonar un fichero Wav o Midi:

Insertar el siguiente código en un módulo:

Declare Function mciExecute Lib "winmm.dll" (ByVal lpstrCommand As String) As Long

Insertar un botón en el formulario y escribir el siguiente código:

Private Sub Command1_Click()
iResult = mciExecute("Play c:\windows\ringin.wav")
End Sub

Hacer sonar un fichero Wav o Midi:

Insertar el siguiente código en un módulo:

Declare Function mciExecute Lib "winmm.dll" (ByVal lpstrCommand As String) As Long

Insertar un botón en el formulario y escribir el siguiente código:

Private Sub Command1_Click()
Dim iResult
iResult = mciExecute("Play c:\windows\ringin.wav")
End Sub