Gif File

I have a gif animation file, which I want to play on one of my forms. Can anyone suggest me, how can I do that.

Add a Picturebox to a Form, place a WebBrowser Control Within the Picturebox, add a CommonDialogbox Control..

Code:

---

Private Sub Command1_Click()
    On Error GoTo Load_Cancel
    With CommonDialog1
        .CancelError = True
        .DialogTitle = "Open an Animated GIF"
        .Filter = "GIFS (*.GIF)|*.GIF"
        .ShowOpen
        WebBrowser1.Navigate .FileName
        WebBrowser1.Move ScaleX(-12, vbPixels, vbTwips), ScaleY(-19, vbPixels, vbTwips), Width, Height
        Picture1 = LoadPicture(.FileName)
        Picture1.AutoSize = True
    End With
Load_Cancel:
End Sub

---

------------------
Aaron Young
Analyst Programmer
[email protected]
[email protected]

Hey Aaron,
Thanks a lot, I will try that.