1
Abra el programa Microsoft Access en el equipo . Haga clic en el menú " Ayuda". Pulse "Bases de datos de ejemplo" y haga clic en " Base de datos. " Esto abre " Neptuno.mdb ".
2
Cierre el cuadro de texto " Central telefónica " cuando se abre. Vaya al menú "Ver". Punto a " objetos de base " y haga clic en " Informes ".
3 Haga clic en el " Listado de Productos informe " en la ventana "Base de datos " . A continuación, " Diseño ". Prensa Volver al menú "Ver" y pulse "Propiedades" para mostrar la hoja de propiedades .
4
Ir al menú "Editar " y haga clic en " ; Seleccione Informe "Pulse la pestaña" " y desactive la " Data propiedad RecordSource . " . Volver al menú "Ver" y seleccione "Code" para ver el módulo del formulario
5
Copiar el código proporcionado por Microsoft : .
Private Sub Report_Open ( Cancel As Integer ) db As DAO.DatabaseDim rs Como DAO.Recordset
Set db = CurrentDb
Abrir un conjunto de registros DAO basado en la lista alfabética de productos queryset rs = db.OpenRecordset ( " Lista alfabética de productos" , dbOpenDynaset ) Me.RecordSource = rs.NameEnd Sub
6
Abra el menú "Archivo" y pulse " Cerrar y volver " a Microsoft Access. Ir al menú " Archivo" y seleccione " Guardar". Cierre el informe y abra la "Lista alfabética de productos " Informe vista previa de impresión de la computadora.