Detecter roulement roulette souris en VB express

Question

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.

Polux31 · Answer

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

Mazered · Answer

Merci:)
Je n'ai pas dit pas de lien j'ai dit pas de lien de recherche google!
a+

CdRomain · Answer

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

Detecter roulement roulette souris en VB express

3 réponses

Discussions similaires

Newsletters