Ako získať prístup Počet záznamov v dotaze

Microsoft Office Access je relačný databázový systém sa často používa pre menšie databázy . Visual Basic for Applications , tiež známy ako VBA , je počítačový programovací jazyk použiť na automatizáciu manuálnych úloh v aplikáciách Microsoft Office . SQL dotaz je bežná operácia vykonaná na načítanie dát z tabuľky . V niekoľkých krokoch môžete písať kód jazyka VBA do dotazu tabuľku a zobrazí počet záznamov prostredníctvom okne so správou . Pokyny dovolená 1

Spustite program Microsoft Office Access a zvoľte " Prázdna databáza " kliknite na tlačidlo " Vytvoriť " . Kliknite na " Databázové nástroje " a vyberte " Visual Basic " . Kliknite na " Vložiť " poľa a vyberte
2

Skopírujte a vložte nasledujúci kód jazyka VBA do modulu " modul " . :

Private Sub getRecordCnt ( )

Dim rst Ako Recordset

Dim db Ako databáza

Dim SQLstr As String

SQLstr = " CREATE TABLE CityInfo ( Mesto TEXT ( 25 ) , štátny TEXT ( 25 ) ) ; "

DoCmd.RunSQL ( SQLstr )

SQLstr = " INSERT INTO CityInfo ( [ město ] , [ stať ] ) "

SQLstr = SQLstr & " VALUES ( ' Arlington ' , ' Texas ' ) ; " Spojené

DoCmd.SetWarnings False

DoCmd.RunSQL ( SQLstr )

SQLstr = " INSERT INTO CityInfo ( [ město ] , [ stáť ] ) "

SQLstr = SQLstr & " VALUES ( ' Watauga " , " Texas " ) ; " Spojené

DoCmd.SetWarnings False

DoCmd.RunSQL ( SQLstr )

SQLstr = " SELECT * FROM CityInfo CityInfo ; . "

Set rst = db.OpenRecordset ( SQLstr )

rst.MoveFirst

rst.MoveLast

MsgBox rst.RecordCount

End Sub
3

Stlačte " F5 " spustiť podprogram . Kód vytvorí novú tabuľku , pridať záznamy do neho , a otvoriť sadu záznamov .

• Predchádzajúca strana: Ako ušetriť filtrovaná dáta do inej tabuľky v programe Access 
• Ďalšia strana: Ako pridať pole Access pomocou jazyka Visual Basic