Discussion :

[adil54]

Bonjour
svp comment on peut faire pour gerer l evenement du passage du souris sur un button pour que ca declenche un méthode?
par exmple au lieu de gerer l evenement Click comment on peut remplacer Click par passage du souri

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Private Sub GCode_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles GCode.Click
        Label.Visible = True
    End Sub

merci

[schwarzy2]

Bonjour,
si j'ai bien compris ta question, tu recherches l'evenement:

btn_MouseHover(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn.MouseHover

[adil54]

merci mais tu sais moi ce que je veux c est si je fais passer souris sur un button1 fait un tric dans une méthode tu vois alors c ca ce que ta compris ?
merci

[adil54]

la je viens de le tester et ca marche mais qd j enleve souris du button ca garde le tric qu il a fait au moment de son passage sur button comment on fait alors pour corriger ca?
si je passe souri fais un tric sinon annule le tric?
merci

[tssi555]

Mets ton code dans l'événement MouseMove.
Si tu veux qu'un événement se déclenche lors du passage de la sourie sur ton boutton, tu dois mettre le code à executer dans l'un des événements suivants:

MouseUp
MouseMove
MouseHover
....

Ca dépend comment tu veux gérer le déclenchement de ton événement.

[adil54]

merci c est jentil de ta part
bon moi je veux par exmple si je passe souris sur button1 fait (X) et si j enleve souris annule (X) tu vois
alors ca sera comme ca

méthode d evenement (
si MouseEnter alors fait (X)
si MouseLeave alors enleve (X)
)


tu vois
merci

[tssi555]

Qu'est ce que tu veux dire par (X)?

[Faladin]

Pour faire ton "tric", en reprenant ton exemple du début. Mais c'était pas mal ce que les gens t'ont dit depuis le début...

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
    Private Sub Bouton_MouseEnter(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BToday.MouseEnter
        Label.Visible = True
    End Sub

et ensuite:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
    Private Sub Bouton_MouseLeave(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BToday.MouseLeave
        Label.Visible = False
    End Sub