Bonjour,  
 
je souhaite afficher des image dans une listeview à l aide d une image liste et je souhaite afficher ces image aléatoirement et chaque image aura un titre que je recupere dans une table qui se trouve dans une base de donnée access donc j ai taper le code suivant mais cela ne fonctionne pas si quelqu un pouvais m aider  
Code:  
 
form load()  
dim liste as listitem  
dim nom as string  
dim al as integer  
 
listview.icons=imagelist  
 
rsnom.movefirst  
do while rsnom.eof=false  
nom=rsnom("Titre" )  
 
randomize  
'''12 car 12 image dans ma imagelist  
al=int((12*rnd)+1)  
 
''' vb bloque ici et me dit que ma liste est vide ???
set liste=listview.listItems.add(,,nom,al)  
 
rsnom.movenext  
 
loop  
 
end sub  
 
 
merci d avance  
end sub