Fonction Hover sur bouton

Bonjour,

Après quelque recherche infructueuse ou mal comprise je viens à vous.

Je cherche a modifier le backgroundimage d'un bouton au survol de la souris dessus et qu'il revienne à la normal à la perte de focus.

J'ai essayer le code suivant :

Code:

---

1 2 3

Private Sub but_menu_MouseHover(sender As Object, e As System.EventArgs) Handles but_menu_devis.MouseHover, but_menu_facture.MouseHover, but_menu_article.MouseHover, but_menu_client.MouseHover, but_menu_parametre.MouseHover Me.BackgroundImage = My.Resources.Bouton_bleu_hover End Sub

---

En mettant un messagebox j'ai bien le messagebox qui s'affiche mais pour le changement d'image ça ne fonctionne pas.

Sauf si je met le nom du controle en dur mais du coup je dois faire 10 "fonctions" alors que mon but est de réduire au max le code

sur un evenement, sender est l'objet qui déclenche l'évènement, ce qui est pratique dans le cas où une méthode gère l'évènement de plusieurs instances comme dans ton cas
c'est As Object car ca peut etre des choses différentes
dans ton cas ca sera toujours un bouton donc :

Code:

---

directcast(sender, button).backgroundimage = lavaleur

---

Merci beaucoup, ça faisait 1h que je testais du "for each" ou bien du "focused" et j'avais jamais le bon contrôle.

Merci encore

Citation:

---

Envoyé par Pol63

sur un evenement, sender est l'objet qui déclenche l'évènement, ce qui est pratique dans le cas où une méthode gère l'évènement de plusieurs instances comme dans ton cas
c'est As Object car ca peut etre des choses différentes
dans ton cas ca sera toujours un bouton donc :

Code:

---

directcast(sender, button).backgroundimage = lavaleur

---

---