Visual Basic 6 - Cerchio riempito

Salve a tutti,
Ho creato una circonferenza sul form con

Circle (3000, 3000), 1000,vbRed

però questa circonferenza voglio riempirla anche essa di rosso...
Grazie!

Ciao, se può esserti ancora utile, per un programmino simile al tuo avevo risolto inserendo in un form una Picturebox e un commandButton e poi il seguente codice:
---------
Option Explicit

Private Sub Command1_Click()
Picture1.DrawWidth = 4
Picture1.Circle (202.5, 145), 100
Pausa 1
Colora
End Sub

Private Sub Colora()
Const Pi As Double = 3.14159265358979
Const Corr As Double = 1.334
Dim angG As Double
Dim angRad As Double
Dim y As Integer, x As Integer
Picture1.Scale (-400, 400)-(400, -400)
For angG = 0 To 360 Step 1
angRad = angG * Pi / 180
x = 200 * Cos(angRad)
y = 200 * Sin(angRad) * Corr
Picture1.Line (0, 0)-(x, y), vbRed
Pausa 0.0001
Next angG
End Sub

Sub Pausa(Value As Double)
Dim t As Double
t = Timer
Do
DoEvents
Loop While Value >= (Timer - t)
End Sub
---------------------
Saluti

qundi da quello che ho capito quel codice riempie la circonferenza di raggi e qundi risulta colorata, giusto?

Esattamente così.
Saluti

grazie