Добавляет поле в визуальный запрос.

Применяется к:

IZbVisualQuery

Синтаксис:

Visual Basic:

Function AddField(Source As Object, Field) As IZbFieldInfo

Source - объект IZbTableRef или IZbQueryRef, откуда берется поле.

Field - имя поля в таблице или поле из подзапроса.

Описание:

Метод добавляет поле в запрос и возвращает объект IZbFieldInfo. Если такое поле уже есть в запросе, то метод возвращает уже имеющийся объект IZbFieldInfo.

Поле может браться из таблицы, входящей в запрос, тогда в качестве Source нужно указать объект IZbTableRef, а в качестве Field указать имя поля в этой таблице. Также можно добавить поля из подзапроса, тогда в Source передается объект IZbQueryRef, соответствующий подзапросу, а параметр Field идентифицирует поле в этом подзапросе - либо индекс поля в коллекции полей подзапроса, либо пользовательское название поля, либо непосредственно объект IZbFieldInfo из коллекции полей подзапроса.

Пример 1:

Dim VisQry As IZbVisualQuery
Dim Field As IZbFieldInfo

' Добавляем поле из таблицы
Set Field = VisQry.AddField(VisQry.Tables(0), "Name")
Field.UserName = "Название"

Пример 2:

Dim VisQry As IZbVisualQuery
Dim AnotherQryInf As IZbQueryInfo ' другой запрос
Dim QryRef As IZbQueryRef

' Добавляем подзапрос
Set QryRef = VisQry.SubQueries.Add(AnotherQryInf)

' Добавляем поле из подзапроса
Set Field = VisQry.AddField(QryRef, "Название")