Un oggetto Recordset può essere un potente strumento da utilizzare in Microsoft Office Access quando si ha bisogno di interrogare una tabella utilizzando Visual Basic, Applications Edition (VBA). Il modo più veloce per recuperare un valore da una query è quello di utilizzare VBA. In VBA è possibile utilizzare l'oggetto per interrogare una tabella in un database e recuperare i valori memorizzati nella tabella. Un oggetto Recordset viene utilizzato per manipolare i dati in un database ad un livello record.

istruzione

1 Aprire il database Northwind e scegliere la scheda "Strumenti di database". Fai clic su "Visual Basic" per aprire l'editor della finestra di Visual Basic.

2 Inizia digitando il seguente codice per creare una nuova subprocedure:

Private Sub readQueryValue ()

3 Copiare e incollare il seguente codice VBA per dichiarare le variabili da utilizzare per leggere una query:

nwDBS fiochi come database

Dim nwRST Come Recordset

Dim nwSQL As String

Set nwDBS = CurrentDb

4 Creazione di una query SQL digitando il seguente codice:

nwSQL = "SELECT dipendenti. [Cognome], dipendenti. [Nome]"

nwSQL = nwSQL & "FROM Impiegati;"

5 Aprire un nuovo Recordset utilizzando query SQL creato nel passaggio precedente:

Set nwRST = nwDBS.OpenRecordset (nwSQL)

6 Spostare il Recordset alla prima riga dei risultati della query e quindi spostare il Recordset in avanti due volte di leggere il "cognome" della terza fila digitando il seguente codice:

nwRST.MoveFirst

nwRST.MoveNext

nwRST.MoveNext

Debug.Print nwRST.Fields ( "[Cognome]"). Valore

7 Terminare la procedura digitando il seguente codice:

nwRST.Close

nwDBS.Close

End Sub

8 Premere il tasto "Ctrl" e "G" per aprire la finestra immediata. Premere il tasto "F5" per eseguire il procedimento e visualizzare i risultati attraverso la finestra immediata.