¿Cómo hacer un reproductor de vídeo con vb?
1. En primer lugar, debemos hacer clic derecho en el panel de herramientas y seleccionar "WindowsMediaPlayer" en la ventana de adición de componentes para agregar este control, y también agregar el control "CommonDialog".
2. Cree un control MediaPlayer, cinco controles CommandButton y un control CommonDialog en el diseñador de ventanas.
3. Cambie el atributo Título de Form1 a "Tinker Bell's Media Player".
4. Nombra las propiedades de Título de los cinco controles CommandButton como "Pausa", "Reproducir", "Detener", "Seleccionar" y "Salir" respectivamente, y luego colócalos en ciertas posiciones.
5. Después de seleccionar el control CommonDialog, ingrese "WAV (*.wav) | *.wav | MIDI (*.mid) | *.mid | MPEG ( *.mpeg)|*.mpeg| Opciones de filtrado de archivos DAT (*.dat)|*.dat|AVI (*.avi)|*.avi|MP3 (*.mp3)|*.mp3", para que pueda Admite varios archivos de imágenes multimedia comunes.
Usa el control del reproductor multimedia de Windows.
1. Hay un control ListBOX con múltiples archivos de video AVI o archivos de música.
2 Al mover el botón hacia arriba y hacia abajo, puede cambiar los archivos de video. archivos de vídeo?
'Establezca la propiedad MultiSelect del control ListBOX en selección de radio (no se puede configurar en tiempo de ejecución, solo se puede configurar en tiempo de diseño)
'Seleccione un archivo en ListBOX controle de antemano e inicie Play
privatesubList1_click()
WindowsMediaPlayer1.URL=List1.List(List1.ListIndex)
WindowsMediaPlayer1.controls.play'Reproduzca el archivo seleccionado actualmente
p>endsub
privatesubUpPlay_click()'Haga clic en el botón arriba
WindowsMediaPlayer1.controls.pause
WindowsMediaPlayer1.controls .stop
List1.Selected(List1.ListIndex-1)=true
WindowsMediaPlayer1.URL=List1.List(List1.ListIndex)
WindowsMediaPlayer1.controls .play'Reproduce el archivo anterior
endsub
privatesubDownPlay_click()'Haz clic en el botón hacia abajo
WindowsMediaPlayer1.controls.pause
WindowsMediaPlayer1 .controls.stop
p>
List1.Selected(List1.ListIndex 1)=true
WindowsMediaPlayer1.URL=List1.List(List1.ListIndex)
WindowsMediaPlayer1.controls.play'Reproducir a continuación un archivo
endsub
************************ ************** ************************************* ***************
1. Cómo cargar WindowsMediaPlayer, controle:
En la barra de menú de VB6.0D, busque "Proyecto". " - "Componentes", en el menú emergente, tire de la barra de desplazamiento para encontrar WindowsMediaPlayer, seleccione la casilla de verificación frente a ella, haga clic en "Aplicar" y "Aceptar", y luego verá el control WindowsMediaPlayer en su control. bar.
2. Cómo reproducir archivos de música
Simplemente asigne el valor correspondiente a WindowsMediaPlayer1.URL.
Por ejemplo, si desea reproducir el archivo music.mp3 cuando se carga el formulario, simplemente escriba el código así.
PrivateSubForm_Load()
WindowsMediaPlayer1.URL=VB.App.Pathamp;\"music.mp3\"
EndSub
Nota : donde music.mp3 es una ruta relativa que representa el archivo en el directorio actual, que es la ubicación donde se guarda su proyecto.
3. Cómo pausar la reproducción
Agrega el siguiente código al botón de comando para lograr esto.
PrivateSubCommand4_Click()
WindowsMediaPlayer1.Controls.pause
EndSub
4.
Agregue el siguiente código al botón de comando para lograrlo.
PrivateSubCommand3_Click()
WindowsMediaPlayer1.Controls.play
EndSub
Si quieres reproducir música desde el principio, sólo necesitas para cambiar el segundo Simplemente escriba el código nuevamente cuando reproduzca música.
PrivateSubCommand5_Click()
WindowsMediaPlayer1.URL=VB.App.Pathamp;\"music.mp3\"
EndSub
5 .Dejar de reproducir música (cerrar el reproductor)
Añade el siguiente código al botón de comando para lograrlo.
PrivateSubCommand1_Click()
WindowsMediaPlayer1.Close
EndSub
Cabe enfatizar que el control WindowsMediaPlayer llama a su WindowsMediaPlayer local para reproducir el reproductor. , y los formatos de reproducción predeterminados admitidos por Windows Media Player son WMA y ASF, por lo que, para la versatilidad del programa que escribe, es mejor elegir WMA o ASF como formato del archivo de música.
Propiedades y métodos comunes del control del reproductor de Windows Media
Descripción de propiedad/método
URL: cadena especifica la ubicación del medio, dirección local o de red
p>uiMode: Cadena; modo de interfaz del reproductor, que puede ser Completo, Mini, Ninguno, Invisible
playState: entero; estado de reproducción, 1=detener, 2=pausa, 3=reproducir, 6 =almacenamiento en búfer, 9=Conectando, 10=Listo
enableContextMenu: booleano; habilitar/deshabilitar el menú contextual
fullScreen: booleano si se muestra en pantalla completa
[controles] wmp.controls controles básicos del reproductor
controles.play; reproducir
controles.pause;
controles.stop
p>controls.currentPosition: doble; progreso actual
controls.currentPositionString: cadena; progreso actual, formato de cadena.
Como "00:23"
controles.fastForward; avance rápido
controles.fastReverse; rebobinado rápido
controles.siguiente canción
controles.anterior; canción anterior
[configuración]wmp.settings configuración básica del reproductor
settings.volume: volumen, 0-100
settings.autoStart: booleano; si se reproduce automáticamente
settings.mute: booleano; si se silencia
settings.playCount: número entero de reproducciones
[ currentMedia ]wmp.currentMedia propiedades de los medios actuales
currentMedia.duration: double; longitud total de los medios
currentMedia.durationString: longitud total de los medios, formato de cadena. Como "03:24"
currentMedia.getItemInfo(conststring); obtiene la información multimedia actual \"Title\" = título del medio, \"Author\" = artista, \"Copyright\" = copyright información, \"Descripción\"=Descripción del contenido multimedia, \"Duración\"=Duración (segundos), \"FileSize\"=Tamaño del archivo, \"FileType\"=Tipo de archivo, \"sourceURL\"=Dirección original< / p>
currentMedia.setItemInfo(conststring); Establece información multimedia a través del nombre del atributo
currentMedia.name: cadena; igual que currentMedia.getItemInfo(\"Title\")
[ currentPlaylist]wmp.currentPlaylist//Propiedades de la lista de reproducción actual
currentPlaylist.count: entero; el número de medios contenidos en la lista de reproducción actual
currentPlaylist.Item[integer] obtiene o; establece el elemento especificado Información multimedia, sus subpropiedades son las mismas que wmp.currentMedia