ImageList

Résolu
cameleon044 Messages postés 36 Date d'inscription mercredi 8 novembre 2000 Statut Membre Dernière intervention 22 novembre 2012 - 19 juin 2006 à 18:39
cameleon044 Messages postés 36 Date d'inscription mercredi 8 novembre 2000 Statut Membre Dernière intervention 22 novembre 2012 - 20 juin 2006 à 17:53
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

4 réponses

Dolphin Boy Messages postés 630 Date d'inscription vendredi 5 mai 2006 Statut Membre Dernière intervention 17 février 2007
19 juin 2006 à 22:27
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"))
3
Dolphin Boy Messages postés 630 Date d'inscription vendredi 5 mai 2006 Statut Membre Dernière intervention 17 février 2007
19 juin 2006 à 18:55
Salut, pour ajouter par code des images dans ton ImageList :
TonImageList.ListImages.Add .....
0
cameleon044 Messages postés 36 Date d'inscription mercredi 8 novembre 2000 Statut Membre Dernière intervention 22 novembre 2012
19 juin 2006 à 20:57
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
0
cameleon044 Messages postés 36 Date d'inscription mercredi 8 novembre 2000 Statut Membre Dernière intervention 22 novembre 2012
20 juin 2006 à 17:53
Tout fonctionne parfaitement, merci beaucoups
0