problemas con el evento _MouseDown
Hola,
tengo un programa, en el que quiero que un boton pueda ser cambiado de posicion durante tiempo de ejecuci贸n, para ello necesito que mi aplicaci贸n ejecute una serie de calculos a la hora de apretar dicho boton, lo cual requiere que el evento boton1_MouseDown se ejecute, pero no hay manera de que lo haga. ¿no se deberia lanzar autom谩ticamente este evento al pulsar el raton? ¿sabeis cual puede ser el problema?
gracias.
tengo un programa, en el que quiero que un boton pueda ser cambiado de posicion durante tiempo de ejecuci贸n, para ello necesito que mi aplicaci贸n ejecute una serie de calculos a la hora de apretar dicho boton, lo cual requiere que el evento boton1_MouseDown se ejecute, pero no hay manera de que lo haga. ¿no se deberia lanzar autom谩ticamente este evento al pulsar el raton? ¿sabeis cual puede ser el problema?
gracias.
hola master..
aqui va lo que necesitas..
Private Sub Command1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = vbLeftButton Then
MsgBox "Lanza el evento Izquierdo del mouse"
ElseIf vbRightButton Then
MsgBox "Lanza el evento Derecho del mouse"
ElseIf vbMiddleButton Then
MsgBox "Lanza el evento Central del mouse"
End If
End Sub
esto te debe servir para lo que queres
Un saludo
Jose Oscar
aqui va lo que necesitas..
Private Sub Command1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = vbLeftButton Then
MsgBox "Lanza el evento Izquierdo del mouse"
ElseIf vbRightButton Then
MsgBox "Lanza el evento Derecho del mouse"
ElseIf vbMiddleButton Then
MsgBox "Lanza el evento Central del mouse"
End If
End Sub
esto te debe servir para lo que queres
Un saludo
Jose Oscar
