Давайте добавим в форму нашу процедуру. Щелкните два раза по форме что бы открылся исходный код формы. Дальше мы выбираем Tools - Add Procedure.

Появиться диалоговое окно в которое нужно будет внести имя процедуры.

После нажатия на ОК у нас появиться процедура.

В ней мы и напишем код по динамической установке свойств.

Public Sub InitDB()

ТаблицаОтчеты.Database = "c:\Base\dbtest.mdb"

ТаблицаОтчеты.RecordSource = "fond_name"

ТаблицаОтчеты.Refresh

End Sub 

Дальше остается только вызвать эту процедуру при загрузки формы.

Private Sub Form_Load()

InitDB

End Sub