Question

vb 控件数组名如何用变量表示

例如用到text1(0),text1(1)...,text2(0),text2(1)...,text3(0),text3(1)... 前面名字都相同后面的数字不同，controls("text" & 1)这样可以表示text1但不是数组，controls("text" & 1)(0),这样的表示数组中的一个元素，我想表示text1.ubound,text2.ubound...这样如何用变量表示呢？
例如 for i = 1 to 10
for j =text & i .ubound
text & i (j).text="123"
next
next

Answer 1

UBound返回数组最大下标
你的Text1控件是数组形式
UBound就是数组的最大下标
例如你声明的数组是text1(10),那么Text1.UBound就是10

例如：
For i = 0 To Text1.UBound
Text1(i).Locked = True

追问

谢谢，因为用到多个同一类型的控件数组，我想在一个循环内进行处理，想用变量表示控件数组名，取每个控件数组UBound。问题如何用变量表示控件数组名。

追答

Private Sub Command1_Click()

For i = 1 To 10

    For j = 0 To Controls("text" & i).ubound

            Controls("text" & i)(j) = "123"

                     Next

                  Next

End Sub

已测试通过！