Cómo configurar registros DAO en Visual Basic

Microsoft Office Access 2007 es una aplicación de base de datos relacional incluido en el paquete de Microsoft Office. Microsoft Data Access Objects (DAO) es una interfaz utilizada para acceder a datos de bases de datos Access. Visual Basic para Aplicaciones (VBA) es un lenguaje de programación utilizado para automatizar los procesos de rutina realizados en las aplicaciones de Microsoft Office. Utilice la base de datos Northwind 2007 predeterminado que se incluye con todas las versiones de acceso, para mostrar la última Código del producto de la tabla productos a través de un conjunto de registros.

Instrucciones

1 Abra la base de datos "Northwind 2007", seleccione "Herramientas de base de datos" y luego en "Visual Basic". Haga clic en el menú "Insertar", luego seleccione "Módulo".

2 Copia y pega el siguiente código en el módulo:

Private Sub DAOSub ()

Dim db Como DAO.Database

Dim primera medida DAO.Recordset

Set db = CurrentDb

Establecer primera db.OpenRecordset = ( "Productos", dbOpenDynaset)

Si rst.RecordCount> 0 Then

rst.MoveLast

MsgBox (primero! [Código de producto])

Terminara si

rst.Close

db.Close

End Sub

3 Pulse la tecla "F5" para ejecutar la subrutina.