Ayuda con matriz de controles

[therealzeta]

Hola, tengo el siguiente codioo. Necesito crear una determinada cantidad de user controles que cree. El problema es que auqnue aparentemente los crea, solo se ve uno. Sin embargo, si los creo uno a uno si se muestran. Pueden decirm que me esta pasando??

Muchas gracias de antemano

Dim controlDisp As New ControlDisp.controlDir()
Dim controlDisp1 As New ControlDisp.controlDir()

For i = 0 To 2


'controlDisp.Tag = 0
'controlDisp.Location = New Point(10, 40)
'controlDisp.Direccion = 1
'controlDisp.Show()
'ctlDirecciones.Add(controlDisp)



'controlDisp1.Tag = 1
'controlDisp1.Location = New Point(200, 40)
'controlDisp1.Direccion = 2
'controlDisp1.Show()
'ctlDirecciones.Add(controlDisp1)


controlDisp.Tag = i
controlDisp.Location = New Point((i + 1) * 70, 40)
controlDisp.Direccion = i
ctlDirecciones.Add(controlDisp)
ctlDirecciones.Item(i).Show()

Next
Me.Controls.AddRange(ctlDirecciones.ToArray())

[therealzeta]

Un dato adicional. el problema esta en la variable text. Si se crean los controles pero se le asignan las ultimas propiedades, pro tanto, tengo 3 controles todos iguales y en la misma posicion. La causa es la definicion de la variable text. Si creo otra variable me muestra entonces los controles pero yo no se que cantidad de variables tendre y por tanto quiero que funcione lo mismo con 1 que con 20. Espero que alguien me pueda ayudar.


Dim ctltextboxes As New List(Of TextBox)
Dim text As New TextBox

For i = 0 To 2

text.Location = New Point(i * 70, 40)
text.Text = "texto" & i
text.Location = New Point(300, 40)
ctltextboxes.Add(text)

Next
Me.Controls.AddRange(ctltextboxes.ToArray())