SoloCodigo

Supongo que lo que quires es reproducir un sonido cuando habres el formulario, si es asi aqui te mando este codigo que cosegui en el foro (pagina 11).

Pega el siguiente código en un módulo .bas o donde se tercie:

Public Declare Function PlaySound Lib "winmm.dll" Alias "PlaySoundA" (ByVal lpszName As String, ByVal hModule As Long, ByVal dwFlags As Long) As Long

Public Const SND_ASYNC = &H1
Public Const SND_NODEFAULT = &H2

y en la parte del código donde quieras reproducir el sonido:

PlaySound App.Path & "sonido.wav", 0, SND_NODEFAULT

Saludos,
Roberto García

Para reproducir videos lo que tienes que hacer es lo siguiente:

- Agrega el componente Microsoft Windows Common Controls 6.0

- Agrega el objeto Animation al formulario.

- En el Evento form_load del formulario por el siguiente código:

    Animation1.Open (ruta_fichero)
    Animation1.Play

En la propiedades del objeto animation, en la propiedad Autoplay pon false para que no se esté reproduciendo sin parar.

Espero haberme explicado bien.

Saludos,
Roberto García