Para crear debes tener una matriz de controles, por ejemplo Text1(0) y Command1(0), y con Load vas creando los controles. Por ejemplo, crear 5 TextBox y 5 Botones uno debajo del otro:
Código:
Dim Looping As Byte
For Looping = 1 To 5
Load Text1(Looping)
Text1(Looping).Left = Text1(0).Left
Text1(Looping).Top = Text1(Looping - 1).Top + Text1(Looping - 1).Height
Text1(Looping).Visible = True
Load Command1(Looping)
Command1(Looping).Left = Command1(0).Left
Command1(Looping).Top = Command1(Looping - 1).Top + Command1(Looping - 1).Height
Command1(Looping).Visible = True
Next Looping
Saludos
