请问，这样的语句怎么改成循环

请教，这样的语句如何改成循环
Dim   a(100)   As   Integer
                a(1)   =   text1.text
                a(2)   =   text2.text
                a(3)   =   text3.text
                a(4)   =   text4.text
                ...........
                a(100)   =   text100.text
请教，这段语句如何用一个for循环来表示，在VB.net中

text1，text2.....为文本框

------解决方案--------------------
首先 将这些textbox放到一个容器里（放到窗体里也一样道理）
假设容器名为gp
然后过程大概如下：

for each ctl as control in gp.controls
dim n as int32=system.convert.toint32(mid(ctl.name,4,len(ctl.name-5)))
if n> 0 and n <=100 then
a(n)=ctl.text
end if
next
------解决方案--------------------
For Each Ctl As Control In Me.Controls
If Ctl.GetType.ToString.Equals( "system.Windows.Forms.TextBox ", StringComparison.InvariantCultureIgnoreCase) Then
i += 1
str(i) = Ctl.Text
MessageBox.Show(str(i))
End If
Next
這樣可以做到,但並不能保證str(1)=text1:str(2)=text2....str(100)=text100.不知是否有其它方法