Visual Basic, Applications Edition (VBA ) è un linguaggio di programmazione progettato da Microsoft e utilizzato per automatizzare le attività di routine in Access. Access è un sistema di gestione di database relazionale incluso nella suite Microsoft Office . Una Query Query Language strutturato ( SQL) viene utilizzato per recuperare i dati da una tabella di database . I risultati di output di una query SQL si accede attraverso un oggetto Recordset . In pochi passi è possibile scrivere codice VBA per creare una query SQL e visualizzare i record recuperati . Istruzioni
1

Aprire il database di Access Northwind di Microsoft Office . Il database Northwind è incluso nella suite Microsoft Office .
2

Fare clic su " Strumenti di database ", quindi selezionare " Visual Basic " per aprire la finestra di Microsoft Visual Basic . Fare clic sul campo "Inserisci" e selezionare "Modulo ".
3

Copia e incolla il seguente codice nel nuovo modulo per visualizzare il nome e il numero di telefono di business nella tabella "Cliente" :

private Sub customerQuery ( ) per

Dim strSQL As String Dim

custRst come Recordset

Dim dbs As Database Dim

rstCntr As Integer Dim

custStr As String

Set dbs = CurrentDb

strSQL = " SELECT Customers . [ Nome ] , "

strSQL = strSQL & "I clienti [Business Phone ] ".

strSQL = strSQL & "FROM clienti; "

custRst = dbs.OpenRecordset ( strSQL ) per

custRst.MoveLast

custRst.MoveFirst

rstCntr = 0 Per custRst.RecordCount - 1

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

"è. un cliente e il loro telefono business è "& custRst.Fields ( 1) . Value & vbCr

custRst.MoveNext

Avanti rstCntr

MsgBox custStr

custRst.Close

dbs.Close

End Sub
4

Eseguire il sottoprogramma con il tasto " F5 ".
< br >