Comment afficher et supprimer une image

Résolu/Fermé
glennog Messages postés 293 Date d'inscription jeudi 3 janvier 2013 Statut Membre Dernière intervention 19 novembre 2013 - 3 janv. 2013 à 19:50
glennog Messages postés 293 Date d'inscription jeudi 3 janvier 2013 Statut Membre Dernière intervention 19 novembre 2013 - 3 janv. 2013 à 22:00
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

Heliotte Messages postés 1491 Date d'inscription vendredi 26 octobre 2012 Statut Membre Dernière intervention 28 janvier 2013 92
3 janv. 2013 à 21:27
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
glennog Messages postés 293 Date d'inscription jeudi 3 janvier 2013 Statut Membre Dernière intervention 19 novembre 2013 4
3 janv. 2013 à 22:00
Merci beaucoup , sa marche
0