Свойство Form.RecordSource (Access)

Используйте свойство RecordSource , чтобы указать источник данных для формы. Для чтения и записи, String.

Синтаксис

expression. RecordSource

выражение: переменная, представляющая объект Form.

Замечания

Параметр свойства RecordSource может быть именем таблицы, именем запроса или инструкцией SQL. Например, можно использовать следующие параметры.

Пример параметра	Описание
Сотрудники	Имя таблицы, указывающее таблицу Employees в качестве источника данных.
SELECT Orders!OrderDate FROM Orders;	Инструкция SQL, указывающая поле OrderDate в таблице Orders в качестве источника данных. Элемент управления в форме или отчете можно привязать к полю OrderDate в таблице Orders , задав для свойства ControlSource элемента управления значение OrderDate.

Примечание.

Изменение источника записей открытой формы или отчета приводит к автоматическому запросу базовых данных. Если свойство Recordset формы задается во время выполнения, свойство RecordSource формы обновляется.

После создания формы или отчета можно изменить источник данных, изменив свойство RecordSource . Свойство RecordSource также полезно, если вы хотите создать повторно используемые формы или отчет. Например, можно создать форму, которая включает стандартную структуру, а затем скопировать форму и изменить свойство RecordSource для отображения данных из другой таблицы, запроса или инструкции SQL.

Ограничение количества записей, содержащихся в источнике записей формы, может повысить производительность, особенно если приложение работает в сети. Например, можно задать для свойства RecordSource формы инструкцию SQL, которая возвращает одну запись, и изменить источник записей формы в зависимости от критериев, выбранных пользователем.

Пример

В следующем примере свойству RecordSource формы присваивается таблица Customers .

Forms!frmCustomers.RecordSource = "Customers"

В следующем примере источник записей формы изменяется на одну запись в таблице Customers в зависимости от названия компании, выбранной в поле со списком cmboCompanyName . Поле со списком заполняется инструкцией SQL, которая возвращает идентификатор клиента (в связанном столбце) и название компании. CustomerID имеет тип данных Text.

Sub cmboCompanyName_AfterUpdate() 
 Dim strNewRecord As String 
 strNewRecord = "SELECT * FROM Customers " _ 
 & " WHERE CustomerID = '" _ 
 & Me!cmboCompanyName.Value & "'" 
 Me.RecordSource = strNewRecord 
End Sub

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.