Animating Text link Sinwaves

Ahamed Saifudeen (11 Submissions) Graphics Visual Basic 5.0 Unknown Difficulty Sat 13^th March 2004 Mon 8^th February 2021

API Declarations
'Create one Timer 'Declarations Dim t as Double

Rate Animating Text link Sinwaves

(1(1 Vote))


For i= 0 To Label.Ubound
Label1(i).Top=1500 + 250 * Sin(t+52)
t=t+0.23
Next 
End Sub

Animating Text link Sinwaves Comments

No comments yet — be the first to post one!