Microsoft Office Access 2007 es una aplicación de base de datos relacional incluido en la suite de Microsoft Office. Objetos de acceso a datos de Microsoft ( DAO ) es una interfaz que se utiliza para acceder a los datos de bases de datos Access . Visual Basic para Aplicaciones ( VBA) es un lenguaje de programación utilizado para automatizar procesos rutinarios realizados en las aplicaciones de Microsoft Office. Utilice la base de datos predeterminada Northwind 2007 que se incluye con todas las versiones de Access, para mostrar el último 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 haga clic en " Visual Basic ". Haga clic en el menú "Insertar " y luego seleccione "Módulo ".
2

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

Private Sub DAOSub ()

db As DAO.Database

primer As DAO.Recordset

Set db = CurrentDb

Set rst = db.OpenRecordset ( "Productos" , dbOpenDynaset )

Si rst.RecordCount > 0 Entonces

rst.MoveLast

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

End If

primera . Close to

db.Close

End Sub
3

Press "F5 " para ejecutar la subrutina.