
16/02/2006, 08:08
|
 | | | Fecha de Ingreso: marzo-2005
Mensajes: 288
Antigüedad: 20 años, 1 mes Puntos: 2 | |
en tu caso seria en la imagen
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 Image1_Click()
iResult = mciExecute("Play c:\windows\ringin.wav")
End Sub
si quieres reproducir un mp3 en la Faq puse un ejemplo ase un tiempo, buscalo.
__________________ "No hay lenguaje de programación potente que sea inferior a otro semejante cuando existe un buen programador que lo defiende"
Yosvanis Cruz Alias VisualGuallabo Ycruz |