Comment afficher et supprimer une image

Résolu
glennog Messages postés 293 Date d'inscription   Statut Membre Dernière intervention   -  
glennog Messages postés 293 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,


j'aimerais savoir comment faire pour enlever puis ajouter une image à une picture box
directement dans l'implementation.
au fait , je voudrais afficher une image lorsqu'on clique sur un bonton , et que cette image disparaisse lorsque je clique sur le deuxième bouton

pourrirez vous m'aider ?? ( en vb 6.0)


A voir également:

2 réponses

Réponse 1 / 2
Heliotte Messages postés 1491 Date d'inscription   Statut Membre Dernière intervention   92
 
Bonsoir glennog , 

Option Explicit

Private Sub Command1_Click(Index As Integer)
    Select Case (Index)
        Case Is = 0 ' ajouter
            Image1.Picture = LoadPicture(App.Path & "\image.jpg")
        Case Is = 1 ' supprimer
            Image1.Picture = Nothing
    End Select
End Sub

Private Sub Form_Load()
    Image1.Picture = LoadPicture(App.Path & "\quatre-quarts-citron-et-noix-de-coco.jpg")
End Sub
1
Réponse 2 / 2
glennog Messages postés 293 Date d'inscription   Statut Membre Dernière intervention   4
 
Merci beaucoup , sa marche
0