|
Microsoft Office Access est un système de gestion de base de données relationnelle couramment utilisé pour les bases de données locales plus petites . L'accès est inclus dans la suite Microsoft Office et fournit tous les outils nécessaires pour gérer une base de données relationnelle . Une requête est utilisée pour récupérer des informations à partir des tables de base de données . D'extraire les numéros d'une requête d'accès est réalisé de la même manière que vous voulez extraire d'autres types de données. Une façon d' extraire des données est d'utiliser Visual Basic pour Applications. En quelques étapes , vous pouvez écrire du code VBA, extraire des numéros à partir d'une requête, et les afficher dans la fenêtre de sortie . Choses que vous devez
Microsoft Office Access
Northwind base de données
Afficher plus Instructions
1 Ouvrez la base de données Access Northwind Microsoft Office . La base de données Northwind est inclus dans la suite Microsoft Office.
2 Cliquez sur " Database Tools ", puis sélectionnez " Visual Basic " pour ouvrir la fenêtre de Microsoft Visual Basic . Cliquez sur le menu "Insertion " et sélectionnez " Module ".
3 Copiez et collez le code suivant dans votre nouveau module pour interroger la table "Produits" et extraire les numéros dans le " Réorganiser niveau " champ supérieur à 15 :
extractNumbers Private Sub ()
de strSQL Dim As String
rst As Recordset
Dim dbs As Database < br > Set dbs = CurrentDb
strSQL = " SELECT produits . [ Nom du produit ] , les produits . [ SEUIL DE COMMANDE ] "
strSQL = strSQL & " FROM Products "
< p> strSQL = strSQL & " WHERE ( ( ( Products. [ SEUIL DE COMMANDE ] ) > 15) ) ; "
Set rst = dbs.OpenRecordset ( strSQL )
rst.MoveLast
rst.MoveFirst
Debug.Print " SEUIL DE COMMANDE > 15: "
Do While Not rst.EOF
Debug.Print " Nom du produit: "& rst.Fields (0 ) Valeur
Debug.Print ". "
Debug.Print " Numéro de commande de niveau: " . & rst.Fields (1) Valeur
rst.MoveNext
boucle
End Sub
|
