Visual Basic - Mover una imagen con blucler o timer

hola
Necesito mover un label o imagen con timer o con un for, ademas de hcer un contador cada que la imagen o label pase por otro vaya aumentado, y tiene que repetirse
Gracias

Esto yo lo uso para mover el caption de un form, quizas te pueda ayudar en lo que tu buscas.

Private Sub MDIForm_Load()
CAT = MDIInicio.Caption + Space(300)
End Sub

Private Sub Timer1_Timer()
CAT = Right(CAT, 1) + Mid(CAT, 1, Len(CAT) - 1)
MDIInicio.Caption = CAT
End Sub