Visual Basic 6. Руководство разработчика



         

Объект - часть 3


Программа 17.15. Обработчик события Tables List Click

Private Sub TblList_Click()

Dim fid As Field

Dim idx As Index

If Left(TblList.Text, 2) = " " Then Exit Sub

FldList.Clear

For Each fld In DB.TableDefs(TblList.Text).Fields

FldList.AddItem fld.Name

Next

End Sub

Если щелкнуть кнопкой мыши на элементе, который начинается с двух пробе­лов (это имя индекса), программа не отреагирует. Если элемент не начинается с двух пробелов, то программа очищает элемент управления ListBox, в котором отображаются имена полей и список заполняется их именами. Чтобы обратиться к ним, программа просматривает элементы семейства DB TableDefs (TbIList Text) Fields. С каждой итерацией к списку добавляется имя следующего поля (fld.Name). Можно отобразить тип поля с помощью свойства Type, а его размер (в байтах) — с помощью свойства Size.

Щелкните кнопкой мыши на имени запроса, и его определение появится в многострочном текстовом поле.

Программа 17.16. Обработчик события Queries List Box Click

Private Sub QryList_Click()

Dim qry As QueryDef

TxtSQL.Text = DB.QueryDefs(QryList.Listlndex).SQL

End Sub

Обратите внимание к объектам TableDefs обращение осуществляется по имени таблицы, а к объектам Query Defs — по имени сохраненного запроса. К ним можно обратиться и с помощью индекса, но так как системные таблицы были опущены, то порядок таблиц в списке Tables уже не такой, как в базе данных, поэтому такой метод в данном приложении работать не будет.

Глава 18. Элементы управления Active Data Object

• Создание проекта Data для работы с базами данных

• Проектирование с использованием конструктора ActiveX DataEnvironment

• Использование элемента управления Active Data Object (ADO)

Современные языки программирования отделяют компоненты доступа к базам данным от остальной части языка. Объединение технологий доступа к базам данных с языком лишает последний гибкости и делает его ограниченным (так как можно получать доступ только к СУБД, поддерживаемым этим языком). Это сдерживает дальнейшее развитие языка. Visual Basic поддерживает разнообразные средства доступа к базам данных, среди которых элементы управления Active Data Object - последняя новинка. В то время как исторически первый инструмент доступа к базам данных (элемент управления Data Access Object (DAO), рассматриваемый в предыдущей главе) позволяет программировать только базы данных MS Access, ADO позволяет работать со всеми основными типами баз данных и является основой для создания универсальной технологии доступа к базам данных в любых средах разработки.




Содержание  Назад  Вперед