[VB6] Creare un loop di immagini

[SuperMariano81]

Ciao a tutti, dovrei creare un loop di sei immagini; sto provando ad usare l'oggetto picture, ma con scarisi risultati, meglio usare l'oggetto IMAGE?
Il tutto viene abbinato ad un timer.

I = 1
Do Until I = 6
    'PIC.Picture = "c:\img\lastd2_0" & I & ".jpg"
    PIC.Picture = "c:\img\lastd2_01.jpg"
    lastd2_01.jpg
    I = I + 1
Loop

End Sub

grazie 1000