Trabajo con vídeos

Asignatura: Tecnología e Informática

Formación en Valor: Honestidad.

Núcleo Integrador: Trabajo con vídeos.

Desempeño esperado: Crea software didácticos con contenido multimedia (vídeo).

Exploración Cognitiva

¿Qué utilidad tiene el vídeo en un software didáctico?

Para utilizar vídeos en Visual Basic Excel se debe activar el control Windows Media Player, para lo cual debe seguir los siguientes pasos.

Activar controles adicionales, clic derecho sobre la barra de controles y seleccionar la opción.

En la ventana controles adicionales activar Windows Media Player.

 

Aparece el siguiente control en la barra de herramientas.

Se debe escribir el siguiente código para poder reproducir el vídeo cuando el formulario se inicie:

Private Sub UserForm_Activate()
 'Este código se ejecuta al Activar el Formulario
 'El video debe estar en la misma carpeta que el archivo de Excel
 With ActiveWorkbook
   WindowsMediaPlayer1.URL = .Path + "\Congelada - Frozen Fiebre.mp4"
 End With
End Sub

Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
  'Este codigo cierra el video al momento de cerrar el formulario.
  'Si no utilizas este código puede quedar ejecutandose  el vídeo en memoria
  WindowsMediaPlayer1.Close
End Sub

NOTA:

Tenga en cuenta que usted puede cambiar el tamaño del control Windows Media Player al tamaño que desee, si en diseño lo adiciona por la propiedad  URL.

Si no utiliza el código anterior y solo asigna el vídeo por la propiedad, al cambiar de computador el buscara la carpeta donde usted indico por propiedad URL el vídeo, por eso es importante el código de la parte superior, para que siempre encuentre el vídeo en la carpeta indicada por código.