Sunday, May 1, 2011

How to use Flash file in VB6

Run VB6 and select Standard EXE
Now right click on the left tool bar and select Components.
Now from components ----> Controls, check the option of Shockwave Flash and press OK


now click on it, and draw a rectangle on your form. It will look like a white rectangle,

Private Sub Form_Load()
    ShockwaveFlash1.Movie = App.Path & "\Star.swf"
    ShockwaveFlash1.Left = 0
    ShockwaveFlash1.Top = 0
    ShockwaveFlash1.Width = 4000
    ShockwaveFlash1.Height = 4000
    ShockwaveFlash1.Play
End Sub