oscar, tengo un programa que mueve un gallo de izquierda a derecha de la pantalla y viceversa, lo hago mover con un timer, te paso como:
tengo varias imagenes de secuencia para el movimiento, llamadas img1.gif, img2.gif, img3.gif, ..., imgN.gif
Luego tengo un control ImageEl código para el movimiento lo hago así:
Private Sub Timer1_Timer()
Me.Image1=LoadPicture(App.Path & "\Img" & bytNroImagen & ".gif")
bytNroImagen = bytNroImagen + 1
if bytNroImagen > N then
bytNroImagen = 1
'para detener el movimiento agregar:
Timer1.Enabled=False
Me.Image1=LoadPicture(App.Path & "\Img1.gif")'Vuelve a la imagen inicial
End if
End Sub
'--N es el número de tu última imagen
'--El intervalo de Timer1 te da la velocidad de secuencias entre imágenes
'--Para mover tu imágen cuando se edita un campo, luego de digitar el dato:
Timer1.Enabled = True
'--
No sé si es lo que pedís, pero te doy esta respuesta...