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 relazionali incluso nella suite Microsoft Office. Una query Structured Query Language (SQL) viene utilizzata per recuperare i dati da una tabella del 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.

istruzione

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

2 Fai clic su "Strumenti di database", quindi selezionare "Visual Basic" per aprire la finestra di Microsoft Visual Basic. Fare clic su "inserire" 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 ()

Dim strSQL As String

Dim custRst Come Recordset

DBS fiochi come database

Dim rstCntr As Integer

Dim custStr As String

Set dbs = CurrentDb

strSQL = "SELECT Customers. [Nome],"

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

strSQL = strSQL & "dalla clientela;"

Set custRst = dbs.OpenRecordset (strSQL)

custRst.MoveLast

custRst.MoveFirst

Per rstCntr = 0 Per custRst.RecordCount - 1

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

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

custRst.MoveNext

Successivo rstCntr

MsgBox custStr

custRst.Close

dbs.Close

End Sub

4 Eseguire la subroutine premendo il tasto "F5".