Een Recordset-object kan een krachtig hulpmiddel om te gebruiken in Microsoft Office Access wanneer u een tabel met behulp van Visual Basic for Applications ( VBA ) ondervragen zijn. De snelste manier om een waarde uit een query te halen is met behulp van VBA . In VBA kunt u het object gebruiken om een tabel een query in een database en ophalen van waarden die zijn opgeslagen in de tabel . Een Recordset-object wordt gebruikt om gegevens in een database op een recordniveau te manipuleren . Wat je nodig hebt database Noordenwind Toon Meer Aanwijzingen 1 Open de database Noordenwind en klik op de tab ' Hulpmiddelen voor databases " . Klik op " Visual Basic " om de Visual Basic Editor venster te openen Start 2 door de volgende code om een nieuwe subprocedure maken: . Private Sub readQueryValue ( ) op < br > Kopieer 3 en plak de volgende VBA- code te verklaren variabelen te gebruiken om een query te lezen : Dim nwDBS Als Database Dim nwRST als Recordset Dim nwSQL als Koord Set nwDBS = CurrentDb 4 Maak een SQL-query door de volgende code : . nwSQL = "SELECT Werknemers [ Laatste naam ] , Werknemers [ voornaam ] " nwSQL = nwSQL & " FROM Werknemers ; " 5 Open een nieuw record set met behulp van de SQL-query gemaakt in de vorige stap . : Set nwRST = nwDBS.OpenRecordset ( nwSQL ) 6 verplaats de Recordset naar de eerste rij van de query resultaten en verplaats de record set twee keer vooruit te lezen van de " Last Name " van de derde rij door de volgende code : nwRST.MoveFirst nwRST.MoveNext nwRST.MoveNext Debug.Print nwRST.Fields . ( " [ Naam ] " ) Value End 7 van de procedure door de volgende code : nwRST.Close nwDBS.Close End Sub Druk op " Ctrl " en 8 " G " om het venster Direct te openen . Druk op " F5 " om uw procedure lopen en bekijk de resultaten door de venster Direct .
|