Cercando cercando ho trovato forse un sistema più semplice per ottenere quanto cercavo e chiedevo.
Con questo codice image1 si muove dolcemente sul form fino a scomparire dallo stesso.

Private Sub Command1_Click()
Timer1.Enabled = True
End Sub

Private Sub Timer1_Timer()
If Image1.Top > 0 Then
Image1.Move Image1.Left + 20, Image1.Top + 50
Else
Image1.Visible = False

Timer1.Enabled = False
End If
End Sub

Potrebbe qualcuno adesso aiutarmi ad indirizzare image1 verso image2.left 4000, image2.top 2640 e poi verso image3.left 5400, image3.top 3000?
e quindi che si fermi là?

grazie
pazienza