De database- programma Access gebruiken om gegevens te sorteren door Microsoft heeft een ingebouwde programmeertaal , Visual Basic for Applications ( VBA ) , die ontwikkelaars gebruiken om de standaard Access 's set van functies uit te breiden . Sorteren is een van de vele functies VBA kunt uitvoeren op gegevens die gebruikers aan te maken of te beheren in Access . Toegang gebruikers kunnen gegevens met VBA behulp van een verscheidenheid van benaderingen , met inbegrip van degenen die niet vereisen dat het leren van een aanzienlijke hoeveelheid van de VBA-code te sorteren . Een belangrijk voordeel van het sorteren van gegevens met Access VBA is de tijd gered van het niet hebben om gegevens handmatig te sorteren . Wat je nodig hebt
Microsoft Access
Toon Meer Aanwijzingen
1 Open Access en klik op het menu "Create " rubriek , gevolgd door " tabel . " Je zult een kleine tafel om een VBA soort presteren op maken . Kopen van 2 Dubbelklik in kolom " Tabel1 's" rubriek en type " firstName , " typ verschillende namen in die kolom . Zorgen elke naam begint met een andere letter van het alfabet , zodat u het effect van de VBA soort dat volgt duidelijk kan zien . Om dezelfde reden , zorgen ervoor dat u de namen in een gesorteerde volgorde invoeren . Voer bijvoorbeeld de naam " Carol ", " Bob " en " Amanda ", in die volgorde .
Press 3 " Ctrl " + " S ", typ " Userinfo " voor de naam van de tabel.
4 Klik op het menu "Create " rubriek , klik vervolgens op "Design Query " knop de " Andere " paneel . Je zult een query voor de VBA soort programma uit te voeren creëren .
5 Dubbelklik op het " Userinfo " item in de " Show tafel " dialoogvenster , klikt u op de knop het dialoogvenster 's " Close " .
6 Sleep de " * , " die alle velden in een tabel staat , op de eerste kleur van het queryontwerpraster .
7 klik met de rechtermuisknop " Query1 "tab , selecteer " SQL-weergave . " Typ het volgende onmiddellijk na de " FROM Userinfo " -clausule : . ORDER
Door " . FirstName "
Deze nieuwe clausule bestellingen de gegevens wanneer Access voert de query
8 Druk op "Ctrl " + " S ", typ dan " q1 " voor de naam van de query .
Press 9 " Alt " + " F11 " om de VBA geïntegreerde ontwikkelomgeving ( IDE ) in te voeren , dat is waar je het programma code zal invoeren voor het sorteren van de " Userinfo " tafel
10 Klik op " module " punt in het menu "Invoegen " 's , dan is de volgende programmacode in het venster van de module plakken . : Public Sub doQuery ( )
Const qname = " q1 " Dim db1
Zoals DAO.Database Dim rs1
Zoals DAO.Recordset
Stel db1 = CurrentDb Set
rs1 = db1.OpenRecordset ( QName ) op Do While Not rs1.EOF Debug.Print " Naam: "
& RS1 !
rs1.MoveNext
Loop
rs1.Close
db1.Close
End Sub
[ Voornaam] Dit programma wordt geopend en de records van een virtueel object met de naam van een recordset . De recordset resultaten van het uitvoeren van de query die u zojuist hebt gemaakt .
11 Klik op een verklaring in het programma , druk daarna op " F5 " om het programma uit te voeren . Druk op " Ctrl " + " G " als je niet de " Immediate " venster te zien . Dit venster toont de resultaten van de " q1 " naargelang query die u aangemaakt .
|
