Make a random animation apear in a form.

I have a form that is 564x463 in size. I want an animation to apear every time you press a button. Can someone tall me what I have to do?

What type of animation do you want? With Pictures? Or with Lines and Shapes?

I think you have to use your imagination a lot if your going to just make some cool animation
Here's an example i made:

Code:

---

Private Sub Command1_Click()
        x = Rnd * ScaleWidth: y = Rnd * ScaleWidth
    For n = 0 To 200
        Rnd -1
        Randomize a
        b = ScaleWidth / 2
        Do
            b = b * 0.95: a = a + b / 100
            Line -(x - Cos(a) * b, y - Sin(a) * b), Rnd * &H1000000
        Loop Until b < 10
        DoEvents
    Next n
End Sub

---

For positioning randomly you use RND function (that returns a "random" value between 0 and 1) And use scalewidth and scaleheight to return your form size.

you you guy's can help me find some animations of fireworks in the colors of red blue green and white. The type that make bit explotions in the sky. If you have heard of artilery shels (firework type, not war type) You know what I mean. I Now think you get the idea.

I searched http://www.planet-source-code.com and some stuff on fireworks came up:

http://www.planet-source-code.com/vb...txtCodeId=4363

http://www.planet-source-code.com/vb...txtCodeId=3496

http://www.planet-source-code.com/vb...txtCodeId=3973

http://www.planet-source-code.com/vb...txtCodeId=9176

http://www.planet-source-code.com/vb...txtCodeId=6790

http://www.planet-source-code.com/vb...txtCodeId=4881

http://www.planet-source-code.com/vb...txtCodeId=2986

If you would rather have a look at what kind these do, go to http://www.planet-source-code.com and type in Fire Works.