Bectores de objetos

[rafapaskual]

Hola, lo siento, tenias razon, lo que te he mandado funciona con formularios, pero no con controles solo. Prueba esto, lo he probado con un formulario y ha funcionado bien.

Dim vLabels(5) As Label
Dim i As Integer
For i = 0 To 4
Set vLabels(i) = Controls.Add("VB.label", "label_" & i)
vLabels(i).Left = Label1.Left + (100 * (i + 1))
vLabels(i).Top = Label1.Top + (Label1.Height * (i + 1))
vLabels(i).Caption = "Label" & i
vLabels(i).Visible = True
vLabels(i).ZOrder 0
Me.Refresh
Next

Es solo un ejemplo pero creo que te servirá. Creo que la propiedad AutoRedraw del formulario tiene que estar a true.

Saludos!