JavaのArrayListに近いクラスオブジェクト。

Dim colTEST    As New Collecion

'追加
colTest.Add ("追加")

'アイテムの数を取得
colTest.Count

'アイテムを取得
colTest.Item([インデックス])

'アイテムを削除
colTest.Remove([インデックス])

Dim intFileNo    As Integer

Dim strBuffer    As String

intFileNo = FreeFile

Open "ファイルパス" For Input As #intFileNo

Do Until Eof( intFileNo)

    Line Input #intFileNo, strBuffer

Loop

Close #intFileNo

各モジュールの先頭に記述する。

Option Explicit