Questo è solo un piccolo esempio pero' tieni conto che devi avere un l'oggetto sul form, in questo caso text1.
Ci sono anche altri sistemi per creare a run time oggetti , ma questo ti da la possibilita' di interaggire in modo piu' facile con tutti gli oggetti creati senza il supporto di API.
ps ricorda di mettere 0 sull' index della text1.
codice:
Dim ID As Integer
Dim spazio As Double
Private Sub Command1_Click()
' text clone
Dim testo As TextBox
ID = ID + 1
Load Text1(ID)
Set testo = Text1(ID)
For i = 0 To 4
With testo
.Left = 200
.Top = spazio
.Width = 2000
.Height = 200
.Text = ""
.Visible = True
End With
spazio = spazio + 400
ID = ID + 1
Load Text1(ID)
Set testo = Text1(ID)
Next i
End Sub
Private Sub Form_Load()
spazio = 400
Text1(0).Visible = False
End Sub