[Last Call] Learn how to a build a cloud-first strategyRegister Now

x
?
Solved

How to erase circles

Posted on 2006-11-10
1
Medium Priority
?
147 Views
Last Modified: 2010-04-30
Hi guys,

I use this code to draw circles on my form:

Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)

Private Sub Form_Load()
    Dim i As Integer
    Dim k As Integer
   
    Me.AutoRedraw = True
    Me.Show

    k = 150
    For i = 0 To 5
        Sleep (500)
        Me.Circle (1850 + k, 420), 30
        k = k + 150
        DoEvents
    Next i
End Sub

How can I erase them once the loop ends?
0
Comment
Question by:Yury Merezhkov
1 Comment
 
LVL 76

Accepted Solution

by:
GrahamSkan earned 2000 total points
ID: 17915876
Me.CLs
0

Featured Post

Upgrade your Question Security!

Add Premium security features to your question to ensure its privacy or anonymity. Learn more about your ability to control Question Security today.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Article by: Martin
Here are a few simple, working, games that you can use as-is or as the basis for your own games. Tic-Tac-Toe This is one of the simplest of all games.   The game allows for a choice of who goes first and keeps track of the number of wins for…
You can of course define an array to hold data that is of a particular type like an array of Strings to hold customer names or an array of Doubles to hold customer sales, but what do you do if you want to coordinate that data? This article describes…
Get people started with the process of using Access VBA to control Outlook using automation, Microsoft Access can control other applications. An example is the ability to programmatically talk to Microsoft Outlook. Using automation, an Access applic…
Get people started with the utilization of class modules. Class modules can be a powerful tool in Microsoft Access. They allow you to create self-contained objects that encapsulate functionality. They can easily hide the complexity of a process from…
Suggested Courses
Course of the Month17 days, 15 hours left to enroll

829 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question