Trying to draw a circle and fill it with color and clear the image on "Clear" command

So far I managed to draw a circle, but keep failing to fill it with color and I cant seem to clear the screen

Private Sub cmdDraw_Click()

Form1.Circle (2750, 1100), 1000 'draw circle

Form1.FillColor = QBColor(Combo1.Text) 'fills the circle with color index taken from a drop down menu

End Sub

and to clear I usedoesnt work)

Private Sub cmdClear_Click()
form1.Clear
End Sub


Any suggestions?