Un objet Recordset peut être un outil puissant à utiliser dans Microsoft Office Access lorsque vous devez interroger une table à l'aide de Visual Basic pour Applications ( VBA) . Le moyen le plus rapide pour récupérer une valeur à partir d'une requête est d'utiliser VBA. Dans VBA, vous pouvez utiliser l'objet pour interroger une table dans une base de données et récupérer les valeurs stockées dans la table . Un objet d'enregistrements est utilisé pour manipuler des données dans une base de données à un niveau d'enregistrement. Choses que vous devez Northwind base de données Voir Plus Instructions 1 Ouvrez la base de données Northwind , puis cliquez sur l'onglet "Outils de base de données " . Cliquez sur " Visual Basic " pour ouvrir la fenêtre de l'éditeur Visual Basic 2 Commencez par taper le code suivant pour créer un nouveau sous-procédure : . Private Sub readQueryValue () 3 Copiez et collez le code VBA suivant pour déclarer des variables à utiliser pour lire une requête : Photos nwDBS As Database nwRST As Recordset < p> nwSQL Dim As String Set nwDBS = CurrentDB 4 Créer une requête SQL en tapant le code suivant : . nwSQL = "SELECT employés [Dernière nom] , employés [ Prénom ] " nwSQL = nwSQL &" FROM Employees ; " 5 Ouvrez un nouveau jeu d'enregistrements à l'aide de la requête SQL créée à l'étape précédente . : Photos Set nwRST = nwDBS.OpenRecordset ( nwSQL ) 6 déplacer le jeu d'enregistrements à la première ligne des résultats de la requête et ensuite passer le jeu d'enregistrements en avant deux fois pour lire le "Last Name " de la troisième ligne en tapant le code suivant : nwRST.MoveFirst nwRST.MoveNext nwRST.MoveNext Debug.Print nwRST.Fields . ( " [nom] " ) Valeur 7 Fin de la procédure en tapant le code suivant : nwRST.Close nwDBS.Close End Sub 8 Appuyez sur "Ctrl " et " G " pour ouvrir la fenêtre Exécution . Appuyez sur la touche "F5 " pour exécuter votre procédure et voir les résultats à travers la fenêtre Exécution .
|