Movimiento de un boton

buenas noches como estan

mi consulta es la siguiente:

tengo el siguiente codigo:

Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
Timer1.Start()
dim contador As Integer
contador = contador + 5
Button1.Left = contador
If contador >= 570 Then
Timer1.Stop()
End If
End Sub

Como pueden ver lo que hace el codigo es mover un boton desde la posicion inicial dada en tiempo de diseño hasta que llegue a los 570 pixeles, el evento se hace en el evento tick del timer asi que cuando se inicia el formulario el boton comienza moverse.

mi pregunta es como hago esto mismo pero dando click en un segundo boton, es decir que al darle click al segundo boton se mueva hasta los 570 pixeles; he intentado hacerlo cpiando este mismo codigo al evento click del boton pero el boton no se mueve de una vez sino que cada vez que le doy click se mueve 5 pixeles y quiero que se mueva como en el evento tick del timer, espero pronta respuesta y gracias de antemano

Ivan Mauricio Marin