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