Uso de ADO con Microsoft Visual Basic y Visual Basic para Aplicaciones

La configuración de un proyecto de ADO y la escritura de código ADO es similar si se usa Visual Basic o Visual Basic para Aplicaciones. En este tema se trata el uso de ADO con Visual Basic y Visual Basic para Aplicaciones y se anotan las diferencias.

Hacer referencia a la biblioteca de ADO

El proyecto debe hacer referencia a la biblioteca ADO.

Para hacer referencia a ADO desde Microsoft Visual Basic

  1. En Visual Basic, en el menú Project, seleccione Referencias....

  2. Seleccione Microsoft ActiveX Data Objects x.x Library (Biblioteca x.x de Objetos de datos de Microsoft) en la lista. Compruebe que también están seleccionadas al menos las siguientes bibliotecas:

    • Visual Basic para Aplicaciones

    • Visual Basic objetos y procedimientos en tiempo de ejecución

    • Visual Basic objetos y procedimientos

    • OLE Automation

  3. Haga clic en OK.

Puede usar ADO tan fácilmente con Visual Basic para Aplicaciones, por ejemplo, mediante Microsoft Access.

Para hacer referencia a ADO desde Microsoft Access

  1. En Microsoft Access, seleccione o cree un módulo en la pestaña Módulos de la ventana Base de datos.

  2. En el menú Herramientas, seleccione Referencias....

  3. Seleccione Microsoft ActiveX Data Objects x.x Library (Biblioteca x.x de Objetos de datos de Microsoft) en la lista. Compruebe que también están seleccionadas al menos las siguientes bibliotecas:

    • Visual Basic para Aplicaciones

    • Biblioteca de objetos de Microsoft Access 8.0 (o posterior)

    • Biblioteca de objetos de Microsoft DAO 3.5 (o posterior)

  4. Haga clic en OK.

Crear objetos ADO en Visual Basic

Para crear una variable de automatización y una instancia de un objeto para esa variable, puede usar dos métodos: Dim o CreateObject.

Dim

Puede usar la palabra clave New con Dim para declarar y crear instancias de objetos ADO en un paso:

Dim conn As New ADODB.Connection

Como alternativa, la declaración de instrucción Dim y la creación de instancias de objeto también pueden ser dos pasos:

Dim conn As ADODB.Connection
Set conn = New ADODB.Connection

Nota

No es necesario usar explícitamente el progid con la instrucción Dim, suponiendo que haya hecho referencia correctamente a la biblioteca ADODB ADO en el proyecto. Sin embargo, su uso garantiza que no tendrá conflictos de nomenclatura con otras bibliotecas.

Nota

Por ejemplo, si incluye referencias a ADO y DAO en el mismo proyecto, debe incluir un calificador para especificar el modelo de objetos que se usará al crear instancias de objetos Recordset, como en el código siguiente:

Dim adoRS As ADODB.Recordset
Dim daoRS As DAO.Recordset

CreateObject

Con el método CreateObject, la declaración y la creación de instancias de objeto deben ser dos pasos discretos:

Dim conn1
Set conn1 = CreateObject("ADODB.Connection") As Object

Los objetos a los que se crea una instancia con CreateObject están enlazados en tiempo de ejecución, lo que significa que no están fuertemente especificados y la finalización de la línea de comandos está deshabilitada. Sin embargo, permite omitir la referencia a la biblioteca de ADO desde el proyecto y permite crear instancias de versiones específicas de objetos. Por ejemplo:

Set conn1 = CreateObject("ADODB.Connection.2.0") As Object

También puede hacerlo creando específicamente una referencia a la biblioteca de tipos de la versión 2.0 de ADO y creando el objeto .

Crear instancias de objetos mediante el método CreateObject suele ser más lento que usar la instrucción Dim.

Controlar eventos

Para controlar eventos ADO en Microsoft Visual Basic, debe declarar una variable de nivel de módulo mediante la palabra clave WithEvents. La variable solo se puede declarar como parte de un módulo de clase y debe declararse en el nivel de módulo. Para obtener una explicación más exhaustiva del control de eventos de ADO, vea Control de eventos de ADO.

Visual Basic Ejemplos

Muchos Visual Basic ejemplos se incluyen con la documentación de ADO. Para obtener más información, vea Ejemplos de código ADO en Microsoft Visual Basic.

Consulte también

Microsoft ActiveX data objects (ADO) Using ADO with Microsoft Visual C++ Using ADO with Scripting Languages