Microsoft Office Access er en relationel database management system ofte anvendes til mindre databaser. Visual Basic for Applications , også kendt som VBA , er en computer programmeringssprog, der anvendes til at automatisere manuelle opgaver i Microsoft Office-programmer . En SQL-forespørgsel er en fælles operation udføres for at hente data fra en tabel . I et par trin, du kan skrive VBA-kode til at forespørge en tabel og vise antallet af poster gennem en besked boks . Instruktioner
1
Start Microsoft Office Access og vælg " Tom database " og derefter klikke på "Opret ". Klik på " Database Tools" og vælg " Visual Basic ". Klik på "Indsæt "-feltet og vælg " Modul ".
2
Kopier og indsæt følgende VBA kode i dit modul : Hej
Private Sub getRecordCnt ()
Dim rst Som Recordset
Dim db Som Database
Dim SQLstr As String
SQLstr = " CREATE TABLE CityInfo (By TEXT ( 25) , State TEXT ( 25) ) ; "
DoCmd.RunSQL ( SQLstr )
SQLstr =" INSERT INTO CityInfo ( [By ], [ State ]) "
SQLstr = SQLstr &" VALUES ( ' Arlington ',' Texas '); "
DoCmd.SetWarnings False
DoCmd.RunSQL ( SQLstr )
SQLstr =" INSERT INTO CityInfo ( [By ], [ State ] ) "
SQLstr = SQLstr &" VALUES ( ' Watauga ', ' Texas '); "
DoCmd.SetWarnings False
DoCmd.RunSQL ( SQLstr )
SQLstr = " SELECT CityInfo * FROM CityInfo , . "
Set rst = db.OpenRecordset ( SQLstr )
rst.MoveFirst
rst.MoveLast
MsgBox rst.RecordCount
End Sub
3
Tryk på " F5 " for at køre din subrutine . Koden vil oprette en ny tabel , tilføje poster til det, og åbne en rekord sæt .