Cómo utilizar MMControl en Visual Basic

El control multimedia de Microsoft o MMControl, es una herramienta de Visual Basic que reproduce archivos multimedia. No encontrará MMControl ser una de las herramientas por defecto en su caja de herramientas, pero puede añadirlo a su lista de controles con la lista de componentes. Puede añadir MMControl para que pueda integrar archivos de audio o vídeo a su proyecto. Sin embargo, MMControl solamente aceptará un archivo a la vez, por lo que si desea crear su propio reproductor de MP3, tendrá que utilizar una matriz para almacenar la lista de pistas.

Instrucciones

1 Abrir un proyecto de Visual Basic. Haga clic en "Proyecto" del menú, y seleccione "Componentes". Vaya a "Microsoft Multimedia Control 6.0" y haga doble clic en él para añadir un recuadro de selección para la selección. Haga clic en "Aceptar" para cerrar la ventana Componentes. Esto se suma MMControl a su caja de herramientas.

2 Haga doble clic en la herramienta MMControl en la caja de herramientas para agregar uno a su forma. Haga clic y arrastre el control a un punto de la forma en que lo necesite.

3 Abra la ventana de código. Tipo "Dim lista de canciones (4) como secuencia" en la parte superior. Esto creará una matriz que contendrá cinco canciones (numeradas de cero a cuatro). Tipo "Dim tracknumber como número entero" para crear una variable de contador.

4 Abra el "Form Load) (" función. Tipo de "lista de canciones (0) = vía_acceso_archivo" para cargar su primera pista en su matriz, donde "vía_acceso_archivo" es la ubicación real de su archivo MP3 en su ordenador. Hacer esto de nuevo para "pista (Lista (1)" a "lista de canciones (4)."

5 Tipo "MMControl1.Command =" Público "" en el "Form_Load)" función (para abrir el dispositivo cuando se inicia el programa. Tipo "tracknumber = 0" en la línea siguiente y "MMControl1.FileName = lista de canciones (número de pista)" en la línea después de eso. Tipo "MMControl.Command =" Juego "en la línea final en la función.

6 Abrir la función "Form_Unload" y escriba "MMControl.Command =" Cerrar "" para parar el control cuando el programa termina.

7 Abra la función "MMControl1_NextClick". Escriba las líneas siguientes:

MMControl1.Command = "Stop"

Si tracknumber = 4 A continuación,

tracknumber = 0

Más

tracknumber = 1 + número de pista

Terminara si

MMControl1.FileName = lista (número de pista)

MMControl1.Command = "Público"

MMControl1.Command = "Play"

8 Abra la función "MMControl1_PrevClick". Escriba las líneas siguientes:

MMControl1.Command = "Stop"

Si tracknumber = 0 Entonces

tracknumber = 4

Más

tracknumber = número de pista - 1

Terminara si

MMControl1.FileName = lista (número de pista)

MMControl1.Command = "Público"

MMControl1.Command = "Play"

9 Pulse la tecla "F5" para iniciar su programa y escuchar sus MP3.