Results 1 to 5 of 5

Thread: how can i draw small little circle like how spaces is ?? randomly ?

  1. #1

    Thread Starter
    Addicted Member
    Join Date
    Jul 1999
    Posts
    219

    Post

    how can i draw small little circle like how spaces is ?? randomly ?

  2. #2
    Hyperactive Member Juan Carlos Rey's Avatar
    Join Date
    Aug 1999
    Location
    Mendoza, Argentina
    Posts
    301

    Post What?

    What?

  3. #3

    Thread Starter
    Addicted Member
    Join Date
    Jul 1999
    Posts
    219

    Post

    i want to draw little circle all over the form randomly and have them stay there and that like if you where in space ...

  4. #4
    Hyperactive Member
    Join Date
    Jun 1999
    Location
    ma,usa
    Posts
    485

    Post

    'Here ya go evil

    Private Sub Form_Load()
    Dim numLittleCircles As Integer
    Dim small As Integer
    Width = 12000
    numLittleCircles = ScaleWidth
    BackColor = vbBlack
    WindowState = vbMaximized
    AutoRedraw = True
    Randomize
    For i = 1 To numLittleCircles
    ForeColor = QBColor(Rnd * 15) 'new random each i
    x = (Rnd * numLittleCircles) 'x coordinate
    y = (Rnd * numLittleCircles) 'y coordinate
    small = Rnd * 100 'this is the radius
    Circle (x, y), small
    Next
    End Sub

    'Hope this helps
    'Joey O

  5. #5
    Frenzied Member Mark Sreeves's Avatar
    Join Date
    Nov 1999
    Location
    UK
    Posts
    1,845

    Post

    Evil

    I can't wait for your Killer App to be unleashed into the world because your questions get more and more bizzare every day!

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  



Click Here to Expand Forum to Full Width