[Vb6]- moduli oggetto- urgente

[visual_b]

Come posso manipolare un arrey di controlli image da un oggetto da me creato?

La struttura del mio programma è più o meno questa:

Un oggetto casella formato da un controllo image e un byte

un oggetto partita che al suo interno, fra gli altri, contiene un arrey dinamico di oggetti casella.

Poi dal form tento di settare un controllo image creato dinamicamente con il suo corrispondente nell modulo di classe

'codice nel form
......
Dim fi As Campo

Private Sub AAA(ByVal rig As Byte, ByVal col As Byte)
Set fi = New Campo
Call fi.dime(rig, col)
Call fi.im(Imgcas(0), 0, 0)
....

'codice oggetto

....

private cmax,rmax as byte
private c() as casella

Sub dime(ByVal rig As Byte, ByVal col As Byte)
If rig <> 0 And col <> 0 Then
cmax = col
rmax = rig
ReDim c(rmax, cmax) As New Casella
End If
End Sub

Sub im(imm As Image, ByVal r As Byte, ByVal c As Byte)
Set G(r, c).A = imm 'Mi da errore "indice non compreso nell' intervallo"
'in questo punto, in fase di esecuzione
End Sub

.....




Aiutatemi pls!!!

[visual_b]

o fatto da solo.
comunque grazie per l'(/lo) (dis)interessamento.