hi! How do I rotate a circle on the X and Y Axis?!
here is the code I use to draw the circle..
VB Code:
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




Reply With Quote