Detecter roulement roulette souris en VB express

Mazered Messages postés 127 Date d'inscription   Statut Membre Dernière intervention   -  
CdRomain Messages postés 9 Date d'inscription   Statut Membre Dernière intervention   -
Salut!

Je voudrais détécter quand la roulette de la souris roule. Pour se faire, j'ai déja trouvé une solution : 

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


Sauf que cette solution ne me convient pas car elle ne permet pas de savoir dans quel sens tourne la souris.

Je travaille sur vb express et non pas sur des macros excel

Merci d'avance!
A+

PS : Ne me mettez pas de lien google svp.
A voir également:

3 réponses

Réponse 1 / 3
Mazered Messages postés 127 Date d'inscription   Statut Membre Dernière intervention   12
 
Merci:)
Je n'ai pas dit pas de lien j'ai dit pas de lien de recherche google!
a+
1
Réponse 2 / 3
Polux31 Messages postés 6917 Date d'inscription   Statut Membre Dernière intervention   1 204
 
Bonjour,

Tu ne veux pas de lien alors penches toi sur System.Windows.Forms.MouseEventArgs, tu trouveras ta réponse.

Bon courage
0
Réponse 3 / 3
CdRomain Messages postés 9 Date d'inscription   Statut Membre Dernière intervention   1
 
Vieux post mais ça peut toujours servir : 
Private Sub Form1_MouseWheel(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseWheel

        If e.Delta > 0 Then
            MessageBox.Show("up!")
        Else
            MessageBox.Show("down!")
        End If
    End Sub
0

Discussions similaires

Trame 12h pour 4 Infirmieres
Anais -
Raymond PENTIER -

2 réponses