请教各位高手：一个窗体的多个文本框的集合如何表示？
for "循环文本框的集合" ' 一个窗体的多个文本框的集合如何表示？"i=i+1
s(1)=Form1.Text1(i).Text '写入s 数组
next
一、文本框是控件数组
Dim i As Long
For i = 0 To Text1.Count - 1
Text1(i).Text = i
Next i
二、文本框不是控件数组
Dim i As Long
For i = 0 To Form1.Controls.Count - 1
'If Form1.Controls(i).Name = "Text1" Then '按名字
If TypeName(Form1.Controls(i)) = "TextBox" Then '按类型
Form1.Controls(i).Text = i + 1
End If
Next i
