[VB6] Array di immagini e sua inizializzazione

[Brainjar]

Ti da errore perchè l'array di immagini lo crei vuoto con la :

Dim image(5) As image
' Prima di utilizzare Set image(1).Picture = Clipboard.GetData
' devi caricare un immagine in image(1) .... 
' Prova con 

Dim objImage as Image
Set objImage = new Image
 
Set image(1) = objImage  
Set image(1).Picture = Clipboard.GetData

'Per liberare l'oggetto objImage per poter caricare un'altra immagine 
Set objImage = Nothing

Set objImage = new Image
 
Set image(2) = objImage  
Set image(2).Picture = Clipboard.GetData

' E così via .......