vba - VisualBasic-変数名の自動インクリメント/ループ

Question

私がこれをしたいときに方法はありますか？

textbox1.text = x + i  
textbox2.text = x + i  
textbox3.text = x + i  

たとえば、このようにするには？

for l = 0 to 2   
  textbox(l) = x + i  
next  

Answer 1

これらのコントロールがユーザーフォーム内にあると仮定して、次のようにします。

Private Sub FillTextboxes()
    Dim i As Long
    Dim x As Long

    x = 10
    For i = 0 To 2
        Me.Controls("textbox" & i + 1).Text = x + i
    Next i
End Sub