3 вопроса.
1) Пишу процедуру:

dim rst as Recordset
rst= currentDB.OpenRecordset ("Таблица1")

сразу ошибка несоответствия типов данных. Меняю as Recordset на Variant
и все прекрасно работает (почему не идет as Recordset ?)

2) Пишу процедуру:

dim rst as Variant
rst= currentDB.OpenRecordset ("Таблица1", dbOpenTable)

опять возникает ошибка, что типа неизвестный аргумент. Удаляю аргумент,
оставив лишь имя таблицы и снова все работает (что не нравится ?)

3) Пишу процедуру:

dim rst as Variant
rst= currentDB.OpenRecordset ("Таблица1")
do until rst.EOF
Поле1=rst.RecordCount
rst.MoveNext
loop

После операции вставки в поле числа записей я хотел добавить еще пару
операторов- пишу RST....(неважно что), и при выполнении лезут ошибки
После rst. по идее должно вылазить подменю с методами и свойствами а его
нет, будто неизвестна переменная.

Может у меня с Accessом что-то, все вышеуказанные операции я выписал
из руководства по VBA (такая книжка).

Вы бы еще сказали как можно отключить DAO и ADO
Я ведь еще учусь и из книги переписываю программы, а они не работают.