Access+VBA+массив=?

Формулировка задачи:

Есть таблица Problems поля T1(дата)
TR(дата)
Надо Т1 занести в массив по циклу i= 1 to n-1
где n количество элементов таблицы проблемс поля Т1(с етоим проблем нет Dcount....)
А вот с синтаксисом занесение элементов таблицы в массив слабовато.
Тоесть я хочу увидеть на выходе к примеру msgbox a(i)
.
.
.
msgbox a(n-1)
Тоесть как то пощупать значения элементов столбца Т1, может ето решается и не массивами.
Тоесть мне надо в ТR занести значения из Т1 по формуле B(j)=А(i+1)-A(i), where i=1....n-1
j=2...m при условии количество элементов A(i)>1.

Решение задачи: «Access+VBA+массив=?»

textual
                            Листинг программы 
                        
                            <font color="blue">Dim</font> n <font color="blue">As</font> <font color="blue">Integer</font>, i <font color="blue">As</font> <font color="blue">Integer</font>, j <font color="blue">As</font> <font color="blue">Integer</font>
<font color="blue">Dim</font> rst <font color="blue">As</font> Recordset, rst1 <font color="blue">As</font> Recordset