VBcoders Guest



Don't have an account yet? Register
 


Forgot Password?



Create very simple visual effect

by Khaldoun Baz (12 Submissions)
Category: Custom Controls/Forms/Menus
Compatability: Visual Basic 5.0
Difficulty: Unknown Difficulty
Originally Published: Mon 29th September 2003
Date Added: Mon 8th February 2021
Rating: (1 Votes)

Create very simple visual effect

Rate Create very simple visual effect



    While 1
        For i = 0 To 10 Step 0.001
            DoEvents
            Circle (Me.Width / 2 + Sin(i) * 2000, Me.Height / 2 + Cos(i) * 2000), 3000, i * j * 1000 + 30
        Next
        j = j + 100
    Wend
End Sub
Private Sub Form_Unload(Cancel As Integer)
End
End Sub

Download this snippet    Add to My Saved Code

Create very simple visual effect Comments

No comments have been posted about Create very simple visual effect. Why not be the first to post a comment about Create very simple visual effect.

Post your comment

Subject:
Message:
0/1000 characters