Использование ADO с Microsoft Visual Basic
Область применения: Access 2013, Office 2013
Настройка проекта ADO и написание кода ADO похожи независимо от того, используете ли вы Visual Basic или Visual Basic для приложений. В этом разделе рассматривается использование ADO как с Visual Basic, так и с Visual Basic для приложений и отмечаются различия.
Ссылка на библиотеку ADO
На библиотеку ADO должен ссылаться проект.
Ссылка на ADO из Microsoft Visual Basic
В Visual Basic в меню Проект выберите Ссылки....
Выберите в списке объекты данных Microsoft ActiveX x.x . Убедитесь, что также выбраны по крайней мере следующие библиотеки:
- Visual Basic for Applications
- Объекты и процедуры среды выполнения Visual Basic
- Объекты и процедуры Visual Basic
- Автоматизация OLE
Нажмите кнопку OK.
Вы можете использовать ADO так же легко с Visual Basic для приложений, например с помощью Microsoft Access.
Ссылка на ADO из Microsoft Access
В Microsoft Access выберите или создайте модуль на вкладке Модули в окне База данных .
В меню Сервис выберите Ссылки....
Выберите в списке объекты данных Microsoft ActiveX x.x . Убедитесь, что также выбраны по крайней мере следующие библиотеки:
- Visual Basic for Applications
- Библиотека объектов Microsoft Access 11.0 (или более поздняя версия)
Нажмите кнопку OK.
Создание объектов ADO в Visual Basic
Чтобы создать переменную автоматизации и экземпляр объекта для этой переменной, можно использовать два метода: Dim или CreateObject.
Dim
Новый ключевое слово с Dim можно использовать для объявления и создания экземпляров объектов ADO за один шаг:
Dim conn As New ADODB.Connection
Кроме того, объявление инструкции Dim и создание экземпляра объекта также могут выполняться в два этапа:
Dim conn As ADODB.Connection
Set conn = New ADODB.Connection
Примечание.
Явно использовать progid ADODB с инструкцией Dim не требуется, если вы правильно ссылались на библиотеку ADO в проекте. Однако его использование гарантирует, что у вас не будет конфликтов имен с другими библиотеками.
Например, если вы включаете ссылки на ADO и DAO в одном проекте, следует включить квалификатор, чтобы указать, какую объектную модель следует использовать при создании экземпляров объектов Recordset , как показано в следующем коде:
Dim adoRS As ADODB.Recordset
Dim adoRS As DAO.Recordset
CreateObject
При использовании метода CreateObject объявление и создание экземпляра объекта должны быть двумя дискретными шагами:
Dim conn1
Set conn1 = CreateObject("ADODB.Connection") As Object
Объекты, созданные с помощью CreateObject , имеют позднюю привязку, что означает, что они не строго типизированы, а завершение командной строки отключено. Однако это позволяет пропускать ссылки на библиотеку ADO из проекта и создавать экземпляры определенных версий объектов. Например:
Set conn1 = CreateObject("ADODB.Connection.2.0") As Object
Это также можно сделать, специально создав ссылку на библиотеку типов ADO версии 2.0 и создав объект .
Создание экземпляров объектов с помощью метода CreateObject обычно выполняется медленнее, чем с помощью инструкции Dim .
Обработка событий
Для обработки событий ADO в Microsoft Visual Basic необходимо объявить переменную уровня модуля с помощью ключевое слово WithEvents. Переменная может быть объявлена только как часть модуля класса и должна быть объявлена на уровне модуля. Более полное обсуждение обработки событий ADO см. в разделе Глава 7. Обработка событий ADO.
Примеры Visual Basic
Многие примеры Visual Basic включены в документацию по ADO. Дополнительные сведения см. в разделе Примеры кода ADO в Microsoft Visual Basic.