请教，这样的语句如何改成循环
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.不知是否有其它方法