フォームに配置されている複数のコントロールを初期化する場合は、
複数の要素の集合体を1つのオブジェクトとして参照できる
Collectionオブジェクトを利用すると、モジュールがコンパクトで
スマートなものになります。

　次のサンプルでは、フォームに配置されているテキストボックスの
値と表示/非表示の切り替えを、フォームを表示する時に発生するイベント
「Load」でCollectionオブジェクトを利用して設定しています。

　フォームには、「テキスト0」〜「テキスト3」の4つのテキストボックスが
配置されています。

　フォームが表示されると、「テキスト0」「テキスト1」「テキスト3」には
変数iの値が表示され、「テキスト2」は非表示になります。

● サンプル　●

Private Sub Form_Load()
    Dim myCollection As New Collection
    Dim i            As Integer
    
    With myCollection
        .Add テキスト0
        .Add テキスト1
        .Add テキスト2
        .Add テキスト3
    End With

    For i = 1 To 4
        If i = 3 Then
            myCollection(i).Visible = False
        Else
            myCollection(i) = i
        End If
    Next

End Sub


　Collectionオブジェクトは、他のオブジェクトと同じ方法で
作成できます。
　宣言は次のように記述します。

Dim myCollection  As New Collection

● 補足説明 ●

　作成したCollectionオブジェクトにメンバを追加するときには
Addメソッドを使います。