Visual Basic para Aplicaciones - mouse-down

al meter codigo en form_mousedown se ejecuta al presionar el boton 1 o 2 del mouse; pero mientras este codigo se ejecuta( un objeto en movimiento) si lo presiono otra vez, lo ejecuta de nuevo; como hago para que mientras esta en movimiento este objeto no ejecute de nuevo el codigo si presiono el boton otra vez por error o intencionalmente?

Utiliza una variable global que indique si está o no en movimiento

Ejemplo

Dim bEnMovimiento As Boolean

Form_Mousedown()
If bEnMovimiento Then
Exit Sub
Else
bEnMovimiento = True
Call Mover
End If
End Sub

Sub Mover()
'.....
bEnMovimiento = False
End Sub

Saludos desde Baires, JuanC

Hola Juan C:
Gracias por tu ayuda lo pondre en practica y despues te comento
saludos desde mèxico.

ya lo he probado y resulto bien; con varias modificaciones pero bien
nuevamente gracias y saludos desde mèxico.