VB6 Caricamento spezzettato matrici di controlli

[qweasdzxc]

Salve a tutti.
Espongo brevemente il mio problema.

Vi posto il codice in questione:
--------------------------------------------------------------------------------------------------------
Dim k as integer
for k = 1 to textconteggio.text ' la textbox mi da il totale file jpg su un cdrom
load miocx(k)
Set mioOCX(k).Image = LoadPicture(List1.List(k - 1)) ' la listbox contiene i percorsi
mioOCX(k).Visible = True
next k
--------------------------------------------------------------------------------------------------------

Eseguendo il codice sopra esposto, se nel cdrom ho tante foto, dovrò aspettare un bel pezzo finchè si aprono le immagini.
Esiste un modo per stoppare il caricamento del mioocx(k).image a 6 per poi proseguire tramite la pressione di un pulsante "avanti" al caricamento delle successive 6 e così via?
PREMETTO: Il mioocx in finestra di progettazione per forza di cose deve essere tassativamente 1.

GRAZIE