Circle non è un oggetto ma un metodo... :rollo:
codice:
Timer1.Enabled=True
'...
Private Sub Timer1_Timer()
    Static Flag As Boolean
    If Flag Then
        Picture1.Cls
    Else
        Picture1.FillStyle = 0
        Picture1.FillColor = vbRed
        Picture1.Circle (X, Y), 75, vbRed
    End If
    Flag = Not Flag
End Sub