Purtroppo non lampeggia.
Ho aggiunto anche un commbutton per farlo lampeggiare,
dopo aver disegnato il punto.

Ho messo il timer
l'ho messo su Timer1.enabled=false
interval su 500

Tutto il codice é adesso questo:
codice:
Private Sub Command1_Click()
Timer1.Enabled = True
Flag = Not Flag
End Sub

Private Sub Form_Load()

  Image1.Left = 0
  Image1.Top = 0
  Image1.Width = Picture1.Width
  Image1.Height = Picture1.Height
 
End Sub

Private Sub image1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
Static Flag As Boolean
Timer1.Enabled = True
    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
Penso sia un errore (mio ?)di impostazione codice


pazienza