SoloCodigo

Yo utilizo el siguiente codigo:

Private Sub Form_Load()
    Me.Height = 4530
    Me.Width = 5575

    Me.Top = 2970
    Me.Left = 4800
   
    Fls.Movie = App.Path & "nombreflash.swf"
    Fls.Play
End Sub
------
Necesitas tener en tus componentes la referencia al ocx del flash.

Ojala y te sirva
Saludos