Frame Animation

[Sonikku`]

What do you think is the fastest way to animation an object. I have my own methods but I'll need speed. Source examples would help aloT. Thanks for your help.

[cyborg]

do you mean how to calculate objects or just count the frames?

[Sonikku`]

I mean counting the frames forward and making the animation loop at a certain point(running).

[cyborg]

Dim Running As Boolean
 
Private Sub Form_Load()
    Me.Show
    Running = True
    Main
End Sub
 
Private Sub Main()
    Dim TempTime As Long
    
    While Running = True
        If TempTime <= GetTickCount Then
            TempTime = GetTickCount + Interval
            'put code in here
        End If
        DoEvents
    Wend
End Sub
 
Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
    Running = False
End Sub