Access -database program ved Microsoft har en indbygget programmeringssprog , Visual Basic for Applications ( VBA ) , som udviklere bruger til at udvide adgangen default sæt af funktioner. Sorteringen er en af ​​de mange funktioner VBA kan udføre på data , som brugere opretter eller bestyrer i Access. Access-brugere kan sortere data med VBA ved hjælp af en række forskellige tilgange , herunder dem , der ikke kræver at lære en betydelig mængde af VBA-kode. En vigtig fordel ved sortering af data med Access VBA er den tid sparet ved ikke at skulle sortere data manuelt. Ting du har brug
Microsoft Access
Vis Flere Instruktioner
1

Open Access , og klik på "Opret" menuoverskrift , efterfulgt af "Table ". Du skal oprette et lille bord til at udføre en VBA slags på .
2

Dobbeltklik på " Tabel1 s" kolonneoverskriften og skrive " Fornavn, " derefter skrive flere navne i denne 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 grund, at du indtaster navne i en usorteret orden. Indtast for eksempel navnene " Carol ", " Bob " og " Amanda ", i den rækkefølge.
3

Tryk på " Ctrl" + "S " og derefter skrive " brugerinfo " for tabellens navn.
4

Klik på " Opret" menuoverskrift , og klik derefter på "Andet" panelets " Query Design "-knappen. Du skal oprette en forespørgsel til VBA slags program til at udføre.
5

Dobbeltklik på " brugerinfo " element i "Show table " dialogboksen , og klik derefter på dialogboksens " Luk" knappen .
6

Træk " * ", som repræsenterer alle felter i en tabel , på den første farve forespørgselsgitteret .
7

Højreklik på " forespørgsel1 "fanen og derefter vælge" SQL-visning . " Indtast følgende umiddelbart efter " FROM brugerinfo "-klausul : .

ORDER By " . Firstname "

Denne nye bestemmelse ordrer data , når Access udfører forespørgslen
8 < p> Tryk på " Ctrl" + "S " og derefter skrive " q1 " til forespørgslen navn.
9

Tryk på " Alt" + " F11 " for at indtaste VBA integrerede udviklingsmiljø (IDE) , der er, hvor du vil komme ind i programmet koden til at sortere de " brugerinfo " table
10

Klik på " indsæt" menuen " Module" element, 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 )

Do While Not rs1.EOF

Debug.Print "Navn : " & RS1 ! [ firstname ]

rs1.MoveNext

Loop

rs1.Close

db1.Close

End Sub
< p > Dette program åbnes og viser de optegnelser af et virtuelt objekt kaldet en postsættet . Postsættet resultaterne fra udførelsen den forespørgsel, du lige har oprettet.
11

Klik på enhver erklæring i programmet, og tryk derefter på " F5 " for at køre programmet. Tryk på " Ctrl" + "G ", hvis du ikke kan se " Immediate " vinduet. Dette vindue vil vise resultaterne af " q1 " sorteres forespørgsel du har oprettet.