Microsoft Access 掲示板

Microsoft Access 掲示板

2次配列で格納したデータを、フィールド名で呼び出す方法。 / 2
2
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)
通報 ...