VB.NET - Capturar la rueda del ratón

Para capturar el movimiento de la rueda del ratón se usa el evento MouseWheel

Para capturar si se mueve hacia arriba o hacia abajo se usa el argumento Delta

Lo que devuelve Delta es:

Si es hacia arriba devuelve un Integer con el valor 120
Si es hacia abajo devuelve un Integer con el valor -120

Un ejemplo:


Private Sub Form1_MouseWheel(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseWheel

Select Case e.Delta
Case 120
'Se ha movido hacia arriba
Case -120
'Se ha movido hacia abajo.
End Select

End Sub

Un uso que se me ocurre por ejemplo es aumentar o disminuir una variable Zoom.

You liked this post? Subscribe via RSS feed and get daily updates.

0 comentarios:

Publicar un comentario en la entrada