大家好，今天来到贵宝地，申请了个id之后，发现跟三版的（google）有些神似，呵呵缘分啊！希望以后在这里，大家能多多互相帮助，hiahia！

问一个设置text控件数组个数的问题：如果数据要分两组通过text读取到txt文件中，其中第一组text中输入的数值确定了第二组text的个数，也就是说第二组里面的text个数是不定的，请问怎么编写代码？
thx！

[此贴子已经被作者于2006-5-9 12:11:41编辑过]

加载一个Text1,一个Text2
其中Text2的Index属性设为0
读Text1的值存到k
For m=1 to k-1
Load Text2(m)
With Text2(m)
'设置Text2(m)的相关属性
End With
Next

text2先要在窗体上加载一个？

大家帮帮忙啊，我这样试了，好像还是不行？？

在设计时加一个text1,一个text2它的属性index=0
Private Sub Command2_Click()
For i = 1 To Val(Text1.Text)
Load Text2(i)

If i Mod 5 = 0 Then
Text2(i).Top = Text2(i - 1).Height + Text2(i - 1).Top
Text2(i).Left = Text2(0).Left
Else
Text2(i).Top = Text2(i - 1).Top
Text2(i).Left = Text2(i - 1).Left + Text2(i).Width
End If
Text2(i).Text = i
Text2(i).Visible = True
Next
End Sub

好的 试过了 果然是有用的

谢谢斑竹！ 我再自己改改让控件数组真正符合我的要求

thx！

哎,难道我说的不是这个意思吗?