Использование свойства Fields объекта TableDef

Пример

Вывести в окно Immediate список полей таблицы “Товары”.

Текст программы:

Dim basa As Database, tabliza As TableDef, s As String, pole As Field

Set basa = CurrentDb

Set tabliza = basa.TableDefs("Товары")

' Список полей, принадлежащих таблице

For Each pole In tabliza.Fields

Debug.Print pole.name

Next

Использование свойства TableDefs объекта Database

Пример

Получить список таблиц в текущей базе данных с указанием в них количества записей.

Dim basa As Database, tabliza As TableDef, tabname As String

Set basa = CurrentDb

Set tabliza = basa.TableDefs("Товары")

' Выведем имена таблиц в текущей базе данных, указав количество записей в них

For Each tabliza In basa.TableDefs

With tabliza

tabname = tabname &.name & "-" &.RecordCount & "записей" & vbCr

End With

Next

MsgBox tabname

Результат:

15. Объект Form –экранная форма Свойства объекта Form

Название	Описание
ActiveControl	Возвращает объект, обладающий в данный момент фокусом клавиатуры.
AllowAdditions	Разрешает (True) или запрещает (False) добавление записей пользователем.
AllowDeletions	Разрешает (True) или запрещает (False) удаление записей пользователем.
AllowEdits	Разрешает (True) модификацию записей пользователем.
AllowFiltres	Разрешает (True) применение фильтров.
Caption	Определяет текст титульной строки.
Controls	Возвращает одноимённую коллекцию, представляющую все элементы управления, размещённые на форме.
CurrentRecord	Возвращает номер текущей записи.
Cycle	Определяет поведение фокуса при нажатии [TAB] в ситуации, когда фокус находится на последнем поле последней записи.
MinMaxButtos	Определяет наличие в окне формы кнопок свёртывания и развёртывания окна.
Name	Возвращает имя формы.
OrderBy	Определяет имя поля, по которому должна происходить сортировка.
OrderByOn	Разрешает (True) или запрещает (False) сортировку записей.
RecordSource	Определяет источник записей для формы.
Visible	Делает форму видимой или скрытой.

Применение некоторых свойств oбъекта Form Свойство Me

Это свойство возвращает значение объект. С его помощью можно обратиться к форме или отчёту из процедуры VBA, хранящейся в составе формы или отчёта.

Пример

Создать форму, в которой будет одна кнопка, по нажатию которой написан программный код, выполняющий следующую задачу: изменить подпись формы “Форма1:форма” на “Текст “:

Private Sub Кнопка0_Click()

Me.Caption = "Текст"

End Sub

До начала работы форма выглядит:

После выполнения события: