Discussion :

[Superpat9999]

Bonjour,
Est-il possible de remettre l'image par défaut sur un bouton sans aller la rechercher dans son dossier ?
J'ai un formulaire avec 2 boutons, lorsque je clique sur le 1er, je modifie son image.
Je souhaite qu'en cliquant sur le second bouton l'image originale se rétablisse.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
Option Compare Database
Option Explicit
 
Private Sub Commande0_Click()
        Dim sDossier As String
        sDossier = CurrentProject.Path & "\Icones\"
        Me.Commande0.Picture = sDossier & "balance_41.bmp"
End Sub
 
Private Sub Commande2_Click()
        Me.Commande0.??? par defaut
End Sub

Merci de votre aide