Cómo insertar sonido en visual basic .net y visual 6.0?

Muchas veces deseamos que se reproduzca un archivo de audio al cliquear un botón o al realizar determinada acción, para ello visual basic .net nos provee de una sencilla línea de código para llevarlo a cabo:

My.Computer.Audio.Play(Application.StartupPath & "/nombredearchivo.wav")

Donde "nombredearchivo.wav" debe ser reemplazado por el nombre de nuestro archivo de audio.



Para hacerlo en visual basic 6.0 se hace lo siguiente:

'Declaraciones
Private Declare Function sndPlaySound Lib "winmm.dll" Alias "sndPlaySoundA" (ByVal lpszSoundName As String, ByVal uFlags As Long) As Long
Const SND_ASYNC = &H1 ' reproducción asíncrona


private sub boton_click()

snd = sndPlaySound(App.Path & "\nombredearchivo.wav", SND_ASYNC)

end sub