ник: Дядя Федор
"Description" есть и у полей. Оно прекрасно читается... если заполнено при создании в конструкторе.
А если там пусто - то ошибка. Свойства нет.
Set rst = CurrentDb.OpenRecordset("SELECT * FROM TBLPRICE")
With rst
For j = 0 To rst.Fields.Count - 1
Debug.Print .Fields(j).Properties("NAME")
On Error Resume Next
Debug.Print .Fields(j).Properties("Description"), .Fields(j).Properties("Type")
Next
End With
****
Set db = CurrentDb
db.TableDefs("TblPrice").Fields("Name")... - не помогло.
****
Description - некое исключение. Однако приведенный выше код взят из хелпа. Но не работает.
Ну да ладно.