Gewusst wie: lesen einen Wert aus einer Abfrage in MS Access 2007

February 25

Gewusst wie: lesen einen Wert aus einer Abfrage in MS Access 2007

Ein Recordset-Objekt kann ein leistungsfähiges Tool in Microsoft Office Access verwenden, wenn eine Tabelle mithilfe von Visual Basic für Applikationen (VBA) Abfragen. Der schnellste Weg zum Abrufen eines Werts aus einer Abfrage ist mithilfe von VBA. In VBA können Sie das Objekt an eine Tabelle in einer Datenbank und Abrufen von Werten in der Tabelle gespeichert. Ein Recordset-Objekt dient zum Bearbeiten von Daten in einer Datenbank auf Rekordniveau.

Anweisungen

1 Öffnen Sie die Nordwind-Datenbank, und klicken Sie auf die Registerkarte "Datenbanktools" und klicken Sie auf "Visual Basic", um das Visual Basic-Editor-Fenster öffnen.

2 Starten Sie durch Eingabe des folgenden Codes ein neues Unterprozedur erstellen:

Private Sub readQueryValue()

3 Kopieren Sie und fügen Sie den folgenden VBA-Code zum Deklarieren von Variablen verwenden, um eine Abfrage zu lesen:

Dim NwDBS als Datenbank

NwRST als Recordset Dim

Dim NwSQL As String

Set NwDBS = CurrentDb

4 Erstellen Sie eine SQL-Abfrage, indem Sie den folgenden Code eingeben:

NwSQL = "wählen Sie beschäftigte. [Nachname], Mitarbeiter. [Vorname] "

NwSQL = NwSQL & "FROM Employees;"

5 Öffnen Sie eine neue Recordset mithilfe der SQL-Abfrage, die in der vorherigen Schritt erstellt:

Set NwRST = nwDBS.OpenRecordset(nwSQL)

6 Verschieben Sie das Recordset auf die erste Zeile der Abfrageergebnisse und verschieben Sie das Recordset weiterleiten zwei Mal den "Nachnamen" Lesen der dritten Zeile durch den folgenden Code eingeben:

nwRST.MoveFirst

nwRST.MoveNext

nwRST.MoveNext

Debug.Print nwRST.Fields ("[Nachname]"). Wert

7 Beenden Sie die Prozedur, indem Sie den folgenden Code eingeben:

nwRST.Close

nwDBS.Close

EndSub

8 Drücken Sie "Strg" und "G", um das Direktfenster zu öffnen. Drücken Sie "F5", um führen Sie die Prozedur und die Ergebnisse über das Direktfenster anzeigen.