Visual Basic pour Applications ( VBA) est un langage de programmation informatique conçu par Microsoft et utilisé pour automatiser des tâches de routine dans Access. Access est un système de gestion de base de données relationnelle inclus dans la suite Microsoft Office . Un langage de requêtes ( SQL) Structured Query est utilisé pour récupérer des données d'une table de base de données. Les résultats de sortie d'une requête SQL sont accessibles par un objet Recordset . En quelques étapes, vous pouvez écrire du code VBA pour créer une requête SQL et visualiser les enregistrements extraits . 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 champ "Insérer" et sélectionner "Module ".
3

Copiez et collez le code suivant dans votre nouveau module pour afficher le prénom et le numéro de téléphone de l'entreprise dans la table "Client" : Photos

Private Sub CustomerQuery ()

strSQL Dim As String

custRst As Recordset

Dim dbs As Database

rstCntr Dim As Integer

custStr Dim As String

Set dbs = CurrentDb

strSQL = " SELECT Customers . [ Prénom ] , "

strSQL = strSQL & «Les clients [ Business Phone ] . "

strSQL = strSQL & " FROM Clients ; "

Set custRst = dbs.OpenRecordset ( strSQL )

custRst.MoveLast

custRst.MoveFirst

rstCntr = 0 To custRst.RecordCount - 1 x

custStr = custStr & custRst.Fields (0 ) Valeur & _

"est. un client et son numéro de téléphone professionnel est "& custRst.Fields (1). Value & vbCr

custRst.MoveNext

Suivant rstCntr

MsgBox custStr

custRst.Close

dbs.Close

End Sub
4

Exécutez votre routine en appuyant sur la touche "F5 ".
< br > Photos