Как найти ширину поля таблицы в Access VBA

#vba #ms-access #dao

#vba #ms-доступ #dao #ms-access

Вопрос:

В Access DAO.TablDef есть функция CreateField(Name,Type,Size) , с помощью которой я ищу размер существующего поля таблицы. У меня есть столбец таблицы типа db_text и имеет размер 6. введите описание изображения здесь
DAO recordset имеет fields класс. Я могу найти тип поля с его помощью, но пока не размер поля. Я попробовал DefinedSize, NumericScale и actualSize. Кто-нибудь знает, как определить размер поля? Спасибо

 Dim dars As Dao.Recordset

Set dars = CurrentDb.OpenRecordset("TableName")

debug.print dars.Fields("FieldName").Type

debug.print dars.Fields("FieldName").DefinedSize
debug.print dars.Fields("FieldName").NumericScale
debug.print dars.Fields("FieldName").ActualSize

dars.Close
Set dars = Nothing
  

Ответ №1:

Size Свойство содержит размер поля:

 debug.print dars.Fields("FieldName").Properties!Size