Uso de ADO con Microsoft Visual Basic y Visual Basic para Aplicaciones
La configuración de un proyecto de ADO y la escritura del código de ADO es similar para Visual Basic y Visual Basic para Aplicaciones. En este tema se aborda el uso de ADO con Visual Basic y Visual Basic para Aplicaciones y se anotan las diferencias.
Referencia a la biblioteca de ADO
El proyecto debe hacer referencia a la biblioteca de ADO.
Para hacer referencia a ADO desde Microsoft Visual Basic
En Visual Basic, en el menú Proyecto, seleccione Referencias....
Seleccione Microsoft ActiveX Data Objects x.x Library (Biblioteca x.x de Objetos de datos ActiveX de Microsoft) en la lista. Compruebe que también se seleccionan al menos las siguientes bibliotecas:
Visual Basic para Aplicaciones
Procedimientos y objetos en runtime de Visual Basic
Objetos y procedimientos de Visual Basic
OLE Automation
Haga clic en OK.
Puede usar ADO de la forma más sencilla con Visual Basic para Aplicaciones, mediante Microsoft Access, por ejemplo.
Referencia a ADO desde Microsoft Access
En Microsoft Access, seleccione o cree un módulo en la pestaña Módulos de la ventana Base de datos.
En el menú Herramientas, seleccione Referencias....
Seleccione Microsoft ActiveX Data Objects x.x Library (Biblioteca x.x de Objetos de datos ActiveX de Microsoft) en la lista. Compruebe que también se seleccionan 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)
Haga clic en OK.
Creación de objetos de 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 de 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 objetos también pueden ser dos pasos:
Dim conn As ADODB.Connection
Set conn = New ADODB.Connection
Nota
No es necesario usar explícitamente la Id. de programa ADODB con la instrucción Dim, suponiendo que se haya hecho referencia de forma correcta a la biblioteca de ADO en el proyecto. Pero el 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 qué modelo de objetos 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 creados con CreateObject están enlazados en tiempo de ejecución, lo que significa que no están fuertemente tipados y la finalización de la línea de comandos está deshabilitada. Pero permite omitir la referencia a la biblioteca de ADO desde el proyecto y le 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.
La creación de instancias de objetos mediante el método CreateObject suele ser más lenta que el uso de la instrucción Dim.
Controlar eventos
Para controlar eventos de 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 sobre el control de eventos de ADO, consulte Control de eventos de ADO.
Ejemplos de Visual Basic
Muchos ejemplos de Visual Basic se incluyen con la documentación de ADO. Para obtener más información, vea Ejemplos de código de ADO en Microsoft Visual Basic.
Consulte también
Microsoft ActiveX Data Objects (ADO)Usar ADO con Microsoft Visual C++Usar ADO con lenguajes de Scripting