Sólo texto | Texto con Imágenes

Underc0de

Programación General => Visual Basic => Códigos Fuentes => Mensaje iniciado por: ANTRAX en Julio 26, 2010, 12:25:56 PM

Título: Como reproducir MP3
Publicado por: ANTRAX en Julio 26, 2010, 12:25:56 PM
Escribimos en un módulo:

Código (vb) [Seleccionar]
Declare Function mciExecute Lib "winmm.dll" (ByVal lpstrCommand As String) As Long

Para reproducirlo:

Código (vb) [Seleccionar]
iRESULT = mciExecute("Play C:\Chiquita.mp3")

Para detener la reproducción

Código (vb) [Seleccionar]
iRESULT = mciExecute("stop C:\Chiquita.mp3")
Sólo texto | Texto con Imágenes