循環中的VBA變量

Question

我有很多字段TextBox1 TextBox2 TextBox3 .... 我想用字段中的數據填充數組。

Private Sub CommandButton1_Click() 
Dim Schild(32, 32) As String 
Dim i As Integer 
Dim prompt_deti As String 

For i = 1 To UBound(Schild) 
    Schild(i, i + 1) = Me.TextBox(i).Text 
    Schild(i, i) = Me.TextBox(i).Text 
    prompt_deti = prompt_deti & Schild(i, i) & Schild(i, i + 1) & Chr(10) 
Next i 

MsgBox prompt_deti 

End Sub 

找不到Eror方法或數據成員！

的Schild（I，I + 1）= Me.TextBox （ⅰ）。文本

如何設置這個變量？ 我在做什麼錯？

Answer 1

你根本無法以這種方式引用文本框。 如果真的有很多文本框，你可以考慮將數據放在一個表中，而不是所有的文本框。這樣你可以循環通過表格。