Et rekordstort sæt i programmering bruges til at holde tabellen poster fra en database. Microsoft Office Access er en relationel database management system inkluderet i Microsoft Office-pakken. Visual Basic for Applications ( VBA ) er en computer programmeringssprog, der anvendes til at automatisere processerne ellers gjort manuelt. I programmering , er det nyttigt at være i stand til at forespørge en tabel og bestemme den største værdi af en bestemt tabel felt . Instruktioner
1

Åbn Microsoft Office Access , skal du vælge " Tom database " og derefter klikke på "Opret ". Klik på " Database Tools" og vælg " Visual Basic " for at åbne Microsoft Visual Basic.
2

Vælg "Indsæt " menuen og klik på " Modul ".
3 < p> Kopier og indsæt følgende kode i dit modul. Koden vil oprette en ny tabel , tilføje poster til det og forespørge den højeste værdi i feltet " Rabatter " feltet gennem en postsættet .

Private Sub readHighestValue ()

Dim dbs som database < br >

Dim rst Som Recordset

Dim SQLstr As String

Set dbs = CurrentDb

SQLstr = " CREATE TABLE tableValues ​​( Sales ANTAL , Rabatter nummer) " < br >

DoCmd.RunSQL ( SQLstr )

SQLstr = " INSERT INTO tableValues ​​([ Salg ], [ Rabatter ]) "

SQLstr = SQLstr & " VALUES ( '10 .52 ' , '1 .25 '); "

DoCmd.SetWarnings False

DoCmd.RunSQL ( SQLstr )

SQLstr =" INSERT INTO tableValues ​​( [ Salg ], [ Rabatter ] ) "

SQLstr = SQLstr & " VALUES ( '15 .25 ' , '4 .52 '); "

DoCmd.SetWarnings False

DoCmd.RunSQL ( SQLstr )
< p > SQLstr = "SELECT TOP 1 tableValues.Discounts "

SQLstr = SQLstr & " FROM tableValues ​​"

SQLstr = SQLstr & " ORDER BY tableValues.Discounts DESC ; "

Set rst = dbs.OpenRecordset ( SQLstr )

MsgBox " Højeste Discount var:" & rst.Fields (0) Value

rst.Close

dbs.Close < . br >

End Sub
4

Styr dit subrutine ved at trykke på " F5 ".