Заполнение полей формы

Есть форма не привязанная к таблице\запросу, с полями. Требуется заполнять поля формы по запросу из таблицы (имена полей и там и там единтичны).

Очень не хочется перечислять в столбик все поля формы для присвоения им требуемых данных.

Можно ли в цикле устроить их перебор?

Dim r0 As ADODB.Recordset
Set r0 = New ADODB.Recordset
r0.Open "SELECT * FROM Data_local WHERE Data_local.Count=3;"
Me!FIO1=r0!FIO1
Me!FIO2=r0!FIO2
...
Me!FIO150=r0!FIO150

у формы есть рекордсет

For Each fld In r0.Fields
Me.Controls(fld.Name) = fld.Value
Next

Анатолий (Киев), спасибо.

Вот только... либо лыжи не едут, либо одно из двух. По идеи следующий код должен мне выдать список полей моей формы?

Dim rst As DAO.Recordset 
Dim fld As Field
Set rst = Me.Recordset
For Each fld In rst.Fields
    Debug.Print fld.Name
Next

Нет. Это список полей её источника данных. Список полей Controls

автор

Есть форма не привязанная к таблице\запросу

В такой форме нет Recordset-a.

:) Я это уже понял

Все, пока вопрос снят. Анатолий (Киев) еще раз спасибо.