Animation

I want to make a program that uses the cross mouse pointer and when i click on the form in runtime a spot appears on the form...as to simulate a bullet going through the form.
is this possible??? with out a lot of work??
thanks

This may not be as wonderful as you want it to be but it should be a good starting point;

In the form's Load event;

Code:

---

Private Sub Form_Load()
Me.MousePointer = vbCrosshair
Me.DrawWidth = 10
End Sub

---

In the form's MouseDown event;

Code:

---

Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
Me.PSet (X, Y)
End Sub

---

Thanks that did what i wanted!! :0)