comment afficher et supprimer une image Résolu

Question

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)


Configuration: Windows 7 / Firefox 17.0

Heliotte · Answer

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

glennog · Answer

Merci beaucoup , sa marche

Comment afficher et supprimer une image

2 réponses

Discussions similaires

Newsletters