Microsoft Office Access 2007 est une application de base de données relationnelle inclus dans la suite Microsoft Office . Microsoft Data Access Objects ( DAO ) est une interface utilisée pour accéder aux données de bases de données Access . Visual Basic pour Applications ( VBA) est un langage de programmation informatique utilisé pour automatiser les processus de routine effectuées dans les applications Microsoft Office. Utilisez la base de données Northwind 2007 inclus par défaut avec toutes les versions d' Access, pour afficher le dernier code du produit à partir de la table Products à travers un jeu d'enregistrements . Instructions
1
Ouvrez la base de données « Northwind 2007», sélectionnez « Database Tools " puis cliquez sur " Visual Basic ". Cliquez sur le menu " Insertion", puis sélectionner "Module ".
2
Copiez et collez le code suivant dans votre module :
privé DAOSub Sub ( )
db As DAO.Database
rst As DAO.Recordset
Set db = CurrentDb
Set rst = db.OpenRecordset («Produits» , dbOpenDynaset )
Si rst.RecordCount > 0 Then
rst.MoveLast
MsgBox ( rst! [Code produit] )
End If
rst . Fermer
db.Close
End Sub
3
Appuyez sur " F5 " pour exécuter le sous-programme.