Escenario

[piojoman]

en el otro tema te respondi esto.

para las imagenes. Primero definis un nombre por cada imagen, ej:

Dim Pic(0 to 5) as string 'Porque guardaremos las rutas de las imagenes

Pic(0)= "c:\Imagen0.jpg"
Pic(1)= "c:\Imagen1.jpg"
Pic(2)= "c:\Imagen2.jpg"
'etc.

Despues lo que tenes que hacer es armar la cuadricula, pero para esto tenes que tener lo que puse en el otro post, lo que pasa es que pense que sabias hacer esto por eso en el otro lo di por hecho... Creas una matriz del control image

Private Sub Form_Load()
dim x as byte

For x = 1 To 9 'Cant de casilleros = 9

Load Image1(x)
Image1(x).Visible = True

'Image(x).Picture = LoadPicture(Pic(x)) ' No me acuerda si toma variable en LoadPicture
If (x Mod 5) = 0 Then
Image1(x).Left = Image1(0).Left
Image1(x).Top = Image1(x - 1).Top + Image1(x - 1).Height
Else
Image1(x).Left = Image1(x - 1).Left + Image1(x - 1).Width
Image1(x).Top = Image1(x - 1).Top
End If
Next

End Sub

-------
Crea una matriz de control de image, (hacelo facil nombrando dos controles iguales y aceptando lo que te muestre) despues ponele borderstyle en Fixed Single y presiona F5 para que veas como queda!!!
Solo pone la ultima parte de este post. Te muestra los casilleros sin nada pero para que veas como se hace una matriz, cuando entiendas bien eso pone el resto y carga las imagenes!!