hatena
hatena
2024/01/19 (金) 11:24:00
レコードセットは配列の上位互換だと思いますが、なぜ配列で処理する必要があるのでしょう?レコードセットならフィールド名でデータを取り出せます。どのような目的で配列にするのでしょうか。
やるとするなら、連想配列(Dictionary)にフィールド名と何列目かを格納して、参照することになるかな?
Dim dic As Object
Set dic = CreateObject("Scripting.Dictionary")
Dim fld As ADODB.Field, i As Long
For Each fld In adoRs.Fields
dic(fld.Name) = i
i = i + 1
Next fld
Debug.Print myArray(dic("フィールド名"), x)
通報 ...