Teniendo un
Label ya creado y con
Index = 0 mediante la instruccion
Load puedes crear copias de un control:
Código:
Option Explicit
Private Sub Form_Load()
Load Label1(1) 'Cargamos un Label1 con Index = 1
'Configuramos el nuevo Label:
Label1(1).Caption = "Copia de Label1"
Label1(1).AutoSize = True
Label1(1).Left = Label1(0).Left
Label1(1).Top = Label1(0).Top + Label1(0).Height
Label1(1).Visible = True 'Por defecto aparecen ocultos.
End Sub
Salu2...