VB6取圆曲线坐标,该怎么处理

VB6取圆曲线坐标
已知圆心坐标，半径，要在该圆曲线上间隔18度画小圆圈
问：怎么确认小圆的圆心坐标？

[解决办法]

VB code

Option ExplicitPrivate Sub Form_Load()    Const PI As Double = 3.1415926535898    Const Cx As Long = 150    Const Cy As Long = 150    Const R As Long = 100    Dim i As Long        Me.AutoRedraw = True    Me.ScaleMode = vbPixels        Me.Circle (Cx, Cy), R        Me.ForeColor = vbRed    For i = 0 To 19        Me.Circle (Cx + Cos(PI * i / 10) * R, Cy + Sin(PI * i / 10) * R), 10    NextEnd Sub
[解决办法]
VB code
Option Explicit 
 Const pi = 3.14159 
 Const r = 31.4159 
 Private Sub Form_Load() 
 Dim i, a 
 Me.AutoRedraw = True 
 Me.BorderStyle = vbBSNone 
 Me.Caption = "" 
 Me.Width = Me.Height 
 Me.Scale (-50, -50)-(50, 50) 
 Me.Circle (0, 0), r, vbRed 
 For i = 0 To 360 Step 18 
 a = i * pi / 180 
 Me.Circle (r * Cos(a), r * Sin(a)), 3, vbRed 
 Next 
 End Sub