DBから取得した値をVBの配列に格納する方法

gt-fさんの書き込み (2007-12-12 14:25) より:
こんちには。gt-fと申します。
VB2005, SQLServer2005 を使って開発しております。
(OS:WinXP(sp2))

SQLServerから取得したオブジェクトを、コレクション(または配列)
に格納する処理をコーディングしております。
VCで作成した関数に、配列を渡す必要があるためです。

以下のようにSqlDataReaderを用いるとできるのですが、
レコード件数が多いと、処理に時間がかかってしまいます。

処理時間をかけずに、DBから取得した配列値をVBのコレクション
(または配列)に格納する手段はあるのでしょうか？

ネットで調べたものの見つからないため、質問させて頂きました。
よろしくお願いいたします。

--------- ソースの抜粋 ---------
Dim colAry As New ArrayList
sqlStr = "SELECT col FROM TBL"
Dim cmd As New SqlCommand(sqlStr, con)
Dim dr As SqlDataReader = cmd.ExecuteReader

'レコード件数分ループ()
Do While dr.Read()
colAry.Add(dr("col"))
Loop
-----------------------------------------------

gt-fさんの書き込み (2007-12-12 14:25) より:

以下のようにSqlDataReaderを用いるとできるのですが、レコード件数が多いと、処理に時間がかかってしまいます。処理時間をかけずに、DBから取得した配列値をVBのコレクション(または配列)に格納する手段はあるのでしょうか？

VCで作成した関数に、配列を渡す必要があるためです

これがあるために悩ましいですね。 配列でないとダメでしょうか? ご提示のコードには配列が見当たりませんが ArrayList のことでしょうか。

説明不足ですみません。時間がかかっているのは以下のループ処理です。

'レコード件数分ループ()
Do While dr.Read()
colAry.Add(dr("col"))
Loop

DataAdapterよりDataReaderが吉
dr("col")よりdr(0)が吉
CommandBehavior.SequentialAccessが吉

実際に効果があるのかを時間を計測して確認しましょう。

仮説ですが、内部的なFETCHが細切れに発生していて、それがボトルネックなら、
DataAdapter.FillしたDataTableから配列にコピーした方が速いかも。