Ciao litterone,
ma nella caption poi come inserisci i numeri?
In ogni caso ti ho predisposto il seguente ciclo con una TextBox ed una Label, poi vedi quello che ti serve realmente:
codice:
Private Sub Form_Load()
Dim i As Integer
'le prime Textbox e Label, con Index=0, esistono già in quanto
'sono state create a design time, quindi occorre solo renderle visibili
'e posizionarle sulla Form:
Me.Text1(0).Visible = True
Me.Text1(0).Move 500, 100
Me.Label1(0).Visible = True
Me.Label1(0).Move 2160, 100
'il ciclo è solo d'esempio
'per creare una serie di altri 5 controlli:
For i = 1 To 5
'carico i controlli:
Load Text1(i)
Load Label1(i)
'posiziono i controlli sotto i precedenti:
With Text1(i)
.Move 500, (400 * i + 100)
.Visible = True
End With
With Label1(i)
.Move 2160, (400 * i + 100)
.Visible = True
End With
Next i
End Sub