ayuda en visual basic 6?

como puedo reproducir una cancion en visual? , la idea es darle click a un command y la reprodusca,, y otro command2 que pare la cancion,, tengo este codigo pero no me da

Option Explicit

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

Private sonido

Private Sub Command1_Click()

sonido = Execute("Play C:\hpmid") <---------aqui esta la ruta de la cancion

End Sub

tambien quiero saber si puedo reproducir archivos wav y mp3,, gracias

1 respuesta

Calificación
  • aem
    Lv 7
    hace 1 década
    Respuesta preferida

    Hola:

    Yo lo hice colocando en el MDI (formulario contenedor del programa) pero se puede colocar en un formulario comun, un objeto multimedia que invoco desde este codigo

    Public Sub Fondo()

    With MDI.MMControl2

    If .Mode <> 524 Then .Command = "Close" '/Si por las moscas no cerró

    .DeviceType = "Sequencer" '//segun el tipo de archivo a reproducir, es este caso es *.mdi

    .Filename = App.path & "\Musica\" & Music '/Music es una cadena con el nombre del archivo

    .Command = "Open"

    .Command = "Prev"

    .Notify = True 'Avisa cuando termina la ejecucion(utiliza el prodedimiento con Done(...)

    .Command = "Play"

    End With

    End Sub

    A continuacion te paso lo que sale en la ayuda msdm sobre esto:

    Usar el control Multimedia

    El control Multimedia permite administrar los dispositivos de la Interfaz de control de medios (MCI). Entre ellos se encuentran las tarjetas de sonido, los secuenciadores MIDI, las unidades de CD-ROM, los reproductores de audio, los reproductores de videodiscos y los grabadores y reproductores de cintas de vídeo.

    El control Multimedia contiene una serie de botones que ejecutan comandos de MCI similares a las funciones que aparecen habitualmente en un reproductor de CD o en un aparato de vídeo.

    El control Multimedia

    Los botones se denominan, de izquierda a derecha, Anterior, Siguiente, Reproducir, Pausa, Atrás, Adelante, Detener, Grabar y Expulsar.

    Aplicación posible

    Administrar la grabación y reproducción de dispositivos MCI.

    Requisitos del control Multimedia y tipos de dispositivos compatibles

    Los botones utilizados y las funciones asociadas que ofrece el control Multimedia dependen de la configuración de hardware y software de cada sistema en particular. Por ejemplo, si la aplicación utiliza dispositivos y controladores multimedia específicos, deberán estar instalados en el equipo del usuario.

    Los sistemas operativos Windows 95 y Windows NT proporcionan controladores para numerosos dispositivos multimedia (por ejemplo, archivos de audio y vídeo). Otros dispositivos, como los reproductores de cintas de audio digital o los escáneres de imágenes, requieren sus propios controladores, que normalmente facilita el fabricante.

    Los dispositivos pueden dividirse en dos tipos: simples y compuestos. Los dispositivos multimedia simples no requieren un archivo de datos para la reproducción. Por ejemplo, cuando se abre un reproductor de audio de videodisco o de CD, es posible reproducir, retroceder o avanzar por las pistas. Sin embargo, los dispositivos compuestos requieren un archivo de datos para la reproducción.

    En la tabla siguiente se enumeran algunos de los dispositivos compatibles con el control Multimedia y la cadena requerida por la propiedad DeviceType para usar el dispositivo. Aquéllos para los que se indica un archivo son dispositivos compuestos.

    Tipo de dispositivo Cadena Tipo de archivo Descripción

    CD /audio /CDAudio /Reproductor de CD de audio

    Cinta de audio digital /DAT /Reproductor de cinta de audio digital

    Vídeo digital /DigitalVideo /Vídeo digital en una ventana (no basado en GDI)

    Otros /Other /Dispositivo MCI no definido

    Gráfico superpuesto /Overlay /Dispositivo de gráficos superpuestos

    Escáner /Scanner /Escáner de imágenes

    Secuenciador /Sequencer/ .mid /Secuenciador Musical Instrument Digital Interface (MIDI)

    Vcr /VCR /Grabador o reproductor de vídeo

    AVI /AVIVideo /.avi/ Vídeo Audio Visual Interleaved (AVI).

    Videodisco /Videodisc /Reproductor de videodisco

    Audio wave /Waveaudio/ .wav /Dispositivo Wave que reproduce archivos de sonido digitalizados.

    Comandos MCI

    El control Multimedia utiliza un conjunto de comandos de alto nivel independientes del dispositivo conocidos como comandos de la Interfaz de control de medios (MCI), que controlan los diversos dispositivos multimedia. Muchos de estos comandos se corresponden directamente con un botón del control Multimedia. Por ejemplo, el comando Play corresponde al botón Reproducir.

    El control Multimedia es en esencia una interfaz de Visual Basic para este conjunto de comandos. Los comandos como Play o Close tienen equivalentes en la estructura de comandos MCI de la API Win32®. Por ejemplo, Play se corresponde con MCI_PLAY. En la tabla siguiente se indican los comandos MCI utilizados por el control Multimedia, junto con sus equivalentes en Win32:

    Comand Comando MCI Descripción

    Open MCI_OPEN Abre un dispositivo MCI.

    Close MCI_CLOSE Cierra un dispositivo MCI.

    Play MCI_PLAY Reproduce un dispositivo MCI.

    Pause MCI_PAUSE or MCI_RESUME Detiene la reproducción o la grabación.

    Stop MCI_STOP Para un dispositivo MCI.

    Back MCI_STEP Retrocede por las pistas disponibles.

    Step MCI_STEP Avanza por las pistas disponibles.

    Prev MCI_SEEK Se sitúa al principio de la pista actual con el comando Seek. Si se ejecuta a los tres segundos del comando Prev, se sitúa al principio de la pista anterior al principio de la primera pista, si está en la primera pista.

    Next MCI

¿Aún tienes preguntas? Pregunta ahora para obtener respuestas.