VB.NETで、20バイト程度のデータを5000件ぐらい一時データとして・・

動的配列を使用されてはいかがでしょうか？ ＜定義＞ Dim abc() As String ＜使用例＞ ※100件ごとに配列を拡張しながらデータ取得する場合 'レコードセット取得 Set RS = DB.Execute("SELECT * FROM EMP") '行番号初期化 lngRow=0 'データを順次取得 Do Until RS.EOF = True '行番号が配列の添え字以上なら１００行分拡張 If lngRow > Ubound(abc) Then Redim Preserve abc(Ubound(abc) + 100) End If 'データ取得 abc(lngRow) = RS.Fields(0).Value '行番号インクリメント lngRow=lngRow+1 '次のレコードへ移動 Call RS.MoveNext() Loop 'レコードセット開放 RS.Close