VB 怎么用循环引用多个文本框的属性？

把文本框弄成控件数组，再用循环语句，应用啊！
如：
for i=1 to 10
a(i)=text1(i).text
next

这样就把text赋值给数组了

能用text(N),前提是文本框名字类似 TEXT1(0),TEXT1(1),TEXT1(2)...TEXT1(n)
其实就是用控件数组,当你将文本框复制 粘贴时VB会询问你是否使用控件数组.
for i=0 to 5
TEXT1(i)=i
next

如果是这样,你最好用控件数组来做
先放一个文本框,再复制这个文本框,再粘贴,第一次粘贴时,在出现的对话框中,选择"是",这样就创建文本框控件数组了,需要几个,再粘贴几个

这样就可以循环了,方法如下:
For i=0 To 9 '假设有10个文本框
Text1(i).Text=i
Next

如果实在不想用控件数组,也行
Private Sub Command1_Click()
For Each Item In Form1
If UCase(Left(Item.Name, 4)) = "TEXT" Then
Item.Text = Rnd
End If
Next
End Sub
不过,这种方法,很难掌握具体是哪个文本框得到什么值

如果不用控件数组，那么你这么引用是不行的，你可以这样用：
Dim i As Integer
For i = 1 To 6
Controls("text" + Trim(Str(i))).Text = i
Next i
这个循环可以同时把text1到text6的text属性赋值。