How to rotate a circle?!

[meteor]

hi! How do I rotate a circle on the X and Y Axis?!

here is the code I use to draw the circle..

Dim t As Double, x As Double, y As Double, r As Double, i As Integer
   Const pi As Double = 3.14159265358979
   r = 32
   Me.Picture1.Cls
   Me.Picture1.Circle (64, 64), r, vbRed 'original red circle of r=32 and center (64,64)
   For i = 0 To 359
      t = (i * pi) / 180 'angle of rotation, in radians
      x = 64 + (r * Cos(t))
      y = 64 + (r * Sin(t))
      SetPixel Me.Picture1.hdc, x, y, vbYellow 'draw the circle point by point
      DoEvents
   Next i

[twanvl]

A rotated circle is still a circle, you use the same code. What do you mean exactly? A 3D rotation?

[opus]

What are you trying to do?

you print a circle in red, OK
after that
you print a circle point by point in yellow,
if your system is slow you maybe seeing the drawing, otherwise it will just look like you did draw a yellow circle

But rotating the circle?, where is you startingpoint?, since you have no such point marked, the circle could be spinning, you would not see it!

What'S the point??

[meteor]

Yes.. I want to make a 3d rotation.. (and dont bother about the red circle )

I attach a picture to describe the rotation (hehe Im realy bad at painting )

the radius of the circle should always be thesame, although it looks like an elipse!

[opus]

Start drawing the cirlce, erase it and draw an elipse (just the circle pressed topgether in the middle) ,erase that and draw an even more "pressed circle" cont. until you have a line and restart from there.

[meteor]

I need the radius of the circle to be the same.

Here is my little program..

And when I turn left or right I want the planet to move
in a circle around the ship...