資料庫欄位是否不能使用陣列迴圈方式.讀取或回存!?(編號:1360)

再次請教各位先進大哥們:
資料庫欄位是否不能使用陣列迴圈方式.讀取或回存...!?
我撰寫的方式如下:
For I = 1 To 120
   Text(I).Text = DataBase.Recordset.RecKey(I)
Next I

For J = 1 To 120
   DataBase.Recordset("RecKey(J)") = Text(J).Text
Next J
執行後會出現如下訊息:
執行階段錯誤'438'
物件不支援此屬性或方法
以上是用ACCESS資料庫.欄位名稱我是設RecKey(1) .RecKey(2) .RecKey(3) ....... RecKey(80)
如果真的不能使用陣列迴圈方式做有沒有其他更簡捷的方式做
我不想寫120 行的敘述將欄位值一一讀取或回存..
也因為資料會隨著資料庫而變動. 便無法在物件屬性上設固定的 RecordSource
請指點我一二. 謝謝. 感激不盡.....