Здравствуйте.
Обнаружил, что одна из баз Access не желает признавать объектную переменную типа Database. Выдает compile error.

А вот в таком виде запускается без проблем:

Public Sub прок()
Dim strСообщение As String
Dim prp As Property
'Dim db As Database
'Set db = CurrentDb
On Error Resume Next
    For Each prp In CurrentDb.Properties
        strСообщение = prp.Name
        strСообщение = strСообщение & ":* " & prp.Value
        Debug.Print strСообщение
    Next prp
End Sub

Access 2016.
Сама база давнишняя, скорее всего преобразована из более старой версии.
У кого-нибудь было такое?

https://www.sql.ru/forum/1316100/peremennaya-database