no me muestra los controles dentro de un pictureBox

[aldo1982]

buenas... el tema es que yo cargo picturebox en tiempo de ejecucion con Load ... y dentro de cada picturebox cargo 1 label...tambien con Load... me carga por ejemplo 4 picturebox, pero dentro de ellos no me carga el label.

aca dejo el codigo.

Código:

Dim rs As ADODB.Recordset
Set rs = New ADODB.Recordset
Dim i As Integer


SQL = "select e_contador.id_contador, e_contador.id_esquina, e_contador.direccion, e_contador.modelo, e_contador.tipo, e_contador.fecha_alta, e_contador.titulo as titulo_contador, "
SQL = SQL & " e_contador_modulo.*, "
SQL = SQL & " w_esquina.* "
SQL = SQL & " FROM e_contador, e_contador_modulo, w_esquina "
SQL = SQL & " WHERE e_contador_modulo.id_contador = e_contador.id_contador "
SQL = SQL & " AND e_contador.id_esquina =  w_esquina.id_esquina "
SQL = SQL & " AND e_contador.id_esquina = " & id_esquina & ""
rs.Open SQL, conectar
contadores_poresquina = rs.RecordCount

i = 1

While Not rs.EOF
    
    'pic_contador(i).Visible = True
    'i = rs!id_contador & rs!id_modulo
    Load contador(i)
    contador(i).Visible = True
    contador(i).Left = rs!dist_left
    contador(i).TOP = rs!dist_top
    contador(i).Tag = rs!id_contador
    
    Load dist_left(i)
    dist_left(i).Caption = CInt(rs!dist_left)
    
    Load dist_top(i)
    dist_top(i).Caption = CInt(rs!dist_top)
    
    
    Load id_contador(i)
    id_contador(i).Visible = True
    id_contador(i).Caption = rs!id_contador
    
    Load id_modulo(i)
    id_modulo(i).Visible = True
    id_modulo(i).Caption = rs!id_modulo
    
    
    Load titulo(i)
    titulo(i).Visible = True
    titulo(i).Enabled = True
    titulo(i) = rs!titulo
    
    Load cantidad(i)
    cantidad(i).Visible = True
    cantidad(i).Caption = rs!cantidad_max
    
    i = i + 1
    
    'pic_contador.Item(i).TOP = rs!TOP
    'MsgBox "Contadores en esta esquina: " & contadores_poresquina & vbNewLine & "Contador: " & rs!id_Contador & " | " & rs!modulo
    rs.MoveNext
Wend

rs.Close
Set rs = Nothing