Visual Basic - Boton del mouse presionado

Life is soft - evento anual de software empresarial
 
Vista:

Boton del mouse presionado

Publicado por Alejandro A. Llerandi (20 intervenciones) el 17/09/2006 17:25:19
Hola, tengo en mi formulario un boton que al hacer click sobre él hace una determinada acción. Me gustaría que si dejo presionado el botón izquierdo del mouse sobre dicho botón, haga la misma acción que cuando hago clic pero que lo siga haciendo mientras tenga presionado el botón izquierdo del mouse.

Intenté hacerlo con el evento MouseDown pero no pude hacerlo.
¿Alguien me puede ayudar?
Desde ya muchas gracias.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Boton del mouse presionado

Publicado por Jasall (60 intervenciones) el 17/09/2006 22:47:02
Buenas, te paso un ejemplode como utilizar el MouseDown y MouseUp

'pon un Command1 y un label1

Dim control As Boolean ' la declaramos a nivel de formulario
Private Sub Command1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
control = True
Do While control = True
Label1 = Val(Label1) + 1
DoEvents
Loop

End Sub

Private Sub Command1_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
control = False
End Sub

' Saludos
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar