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.