hvordan man bruger Visual Basic adgang til at sortere data

Indlæg af Alice Hansen     opdateret: 2011-10-21

Access -databasen programmet Microsoft har en indbygget programmeringssprog , Visual Basic for Applications ( VBA ) , som udviklerne bruger til at udvide adgangen 's standard sæt af funktioner . Sortering er en af de mange funktioner VBA kan udføre på data, som brugerne kan oprette eller håndtere i Access . Access -brugere kan sortere data med VBA ved hjælp af forskellige tilgange, herunder dem, der ikke kræver uddannelse en betydelig mængde af VBA -kode . En vigtig fordel ved sortering af data med Access VBA er den sparede tid ved ikke at skulle sortere data manuelt .

Du skal bruge:
Microsoft Access


1
Open Access , og klik på " Opret "-menuen overskriften , efterfulgt af . " Tabel ". Du skal oprette et lille bord til at udføre en VBA sortere .
2 .
Dobbeltklik på i " Tabel1 's " kolonneoverskriften og skrive " Fornavn "og derefter skrive flere navne i den pågældende kolonne . Sikre, at hver navn starter med et andet bogstav i alfabetet , så du tydeligt kan se effekten af VBA slags , der følger . Af samme årsag , at du indtaster navne i en usorteret orden . For eksempel , indtast navnene " Carol ", " Bob "og " Amanda ", i nævnte rækkefølge .
3 .
Tryk på " Ctrl " + " S "og derefter skrive " UserInfo " for tabellen navn .
4 .
Klik på " Opret " i menuen overskriften , og klik derefter på " Andet " panelets " Søgning Design " -knappen . Du skal oprette en forespørgsel til VBA slags program til at udføre .
5 .
Dobbeltklik på " UserInfo " element i "Vis tabel " dialogboksen , og klik derefter på dialogboksen 's " Luk " knappen .
6 .
Træk " * ", som repræsenterer alle felter i en tabel , på den første farve i forespørgselsgitteret .
7 .
Højreklik på " forespørgsel1 " fanen , og derefter vælge " SQL-visning . " Skriv følgende umiddelbart efter " FRA UserInfo " klausul : " . Fornavn "

Orden

Denne nye bestemmelse pålægger data, når Access udfører forespørgslen .
8 .
Tryk på " Ctrl " + " S "og derefter skrive " Q1 "til forespørgslen navn .

9 .
Tryk "Alt " + " F11 "for at indtaste VBA integrerede udviklingsmiljø ( IDE ) , som er stedet, hvor du vil indtaste programkode til sortering af de " UserInfo "-tabellen . .
10
Klik på "Indsæt " i menuen 's "Modul -punkt , og derefter indsætte følgende program kode i modulet vindue :


Public Sub doQuery ( )
Const qName=" Q1 "
Dim db1 Som DAO. Database
Dim RS1 Som DAO. Recordset

Set db1=CurrentDb
Set RS1=db1. OpenRecordset ( qName )

gøre, mens ikke rs1. EOF
Debug. Print " Navn : " RS1 [ Fornavn ]
rs1. MoveNext
Loop
!
RS1 . Luk
db1. Close
End Sub

Dette program åbnes og viser referatet af et virtuelt objekt kaldet en postsættet . Postsættet resultater fra fuldbyrdende den forespørgsel, du netop har oprettet.
11 .
Klik på en erklæring i programmet , og tryk derefter på " F5 "for at køre programmet. Tryk på " Ctrl " + " G " , hvis du ikke kan se " Øjeblikkelig "vinduet . Dette vindue vil vise resultaterne af " Q1 " sorteret forespørgsel du har oprettet.


Previous:hvordan man kan bruge. dll i VBS Next:hvordan man åbner en postsættet



 

Kommentarer

Code:
change