ImageListRésolu

Question

Bonjour, voilà je suis en stage et je doit faire un petit prog en VBA jusque la aucun probleme.


Mais il faut que je mette un ComboImage dans une form qui recupere les images d'un ImageList.


Mais le probeme qui se pose est que je ne sait comment inserer des
images dans un imagelist sans faire "personnaliser/image/inserer...."
(car je veu que l'utilisateur puisse inserer des images)



Merci beaucoup

Dolphin Boy · Accepted Answer

Exemple tiré de la msdn VB6 :

   Dim imgX As ListImage
   ' Ajoute des images à la collection ListImages.
   Set imgX = ImageList1.ListImages.Add(,"Fusée", _
      LoadPicture("icons\industry\rocket.ico"))
   Set imgX = ImageList1.ListImages.Add(,"Avion", _
      LoadPicture("icons\industry\plane.ico"))
   Set imgX = ImageList1.ListImages.Add(,"Voiture", _
      LoadPicture("icons\industry\cars.ico"))

Dolphin Boy · Answer

Salut, pour ajouter par code des images dans ton ImageList :
TonImageList.ListImages.Add .....

cameleon044 · Answer

Salut, merci d'avoir répondu mais quand je met
MonImage.ListImages.add.... il me dit que ma ligne est incorrect et
qu'il manque un égal (=) et la je suis bloqué.

Merci

cameleon044 · Answer

Tout fonctionne parfaitement, merci beaucoups

ImageList

4 réponses

Votre réponse

Discussions similaires