Visual Basic - Reproducir MP3

Hola que tal.
Quería saber cómo hacer para hacer sonar archivos mp3 solo utilizando funciones API. He estado buscando por aquí y hay mucho sobre mp3 pero no dicen como hacerlo. Con estos ejemplos solo puedo hacer sonar archivos WAV. Sólo quiero abrirlos, reproducirlos y cerrarlos.

Ejemplo 1
________
Private Declare Function mciExecute Lib "winmm.dll" (ByVal lpstrCommand As String) As Long
Dim Resultado As Long
Resultado = mciExecute("Play Path+NombreArchivo.wav")

Ejemplo 2
________
Declare Function mciSendString Lib "winmm.dll" Alias "mciSendStringA" (ByVal lpstrCommand As String, ByVal lpstrReturnString As String, ByVal uReturnLength As Long, ByVal hwndCallback As Long) As Long
Private Resultado As Long
Private Instruccion As String

Private Sub cmdOpen_Click()
Instruccion = Space(255)
Resultado = mciSendString(“Open Path+NombreArchivo.wav Type WaveAudio Alias NombreAlias” , Instruccion, Len(Instruccion), 0)
End Sub

Private Sub cmdPlay_Click()
Instruccion = Space(255)
Resultado = mciSendString("Play NombreAlias ", Instruccion, Len(Instruccion), 0)
End Sub

Private Sub cmdStop_Click()
Instruccion = Space(255)
Resultado = mciSendString("Stop NombreAlias ", Instruccion, Len(Instruccion), 0)
End Sub

Private Sub cmdClose_Click()
Instruccion = Space(255)
Resultado = mciSendString("Close NombreAlias ", Instruccion, Len(Instruccion), 0)
End Sub

Gracias de antemano

Revisa este enlace
http://www.mygnet.net/codigos/vb/20/1086/