Ako odovzdať reťazec k Rovnako ako príkaz v aplikácii Microsoft Access

Otázka dát z databázovej tabuľky pomocou zástupných znakov v programe Microsoft Access nie je tak ťažké , ako si môžete myslieť . V programe Access môžete použiť Visual Basic for Applications ( VBA ) pre automatizáciu procesov , ako je dotazovanie dát . Vo VBA môžete vytvoriť SQL dotazu v tabuľke sú uvedené hodnoty , ktoré zodpovedajú vzoru určíte . " Ako" operátor možno použiť v príkazoch SQL určiť kritériá , ako je " Like " D " * " , ktorá vráti všetky hodnoty poľa začínajúce písmenom D. to , čo potrebujete
databáze Northwind

Zobraziť ďalšie inštrukcie Cestuj 1

kliknite na záložku " Database Tools " , kliknite na " Visual Basic " a kliknite na " Vložiť " menu . . Kliknite na " modul " vložiť nový kód modulu
2

Vytvoriť nový čiastkový postup zadaním nasledujúceho :

Private Sub useLikeCommand ( )

3

deklarovať premenné , ktoré budete používať na dotaz databázové tabuľky pridaním nasledujúceho kódu VBA : klipart

Dim dataString As String

Dim dbs ako databáza

Dim rst Ako Recordset

Dim X As Integer

Set DBS = CurrentDb
4

Zadajte reťazec , ktorý bude odovzdávať do SQL príkazu :

dataString = " A * "
5

zadajte nasledujúci kód na otvorenie objektu Recordset pomocou príkazu SQL , ktorý pomocou operátora LIKE :

Set rst = dbs.OpenRecordset ( " SELECT Zamestnanci . [ Priezvisko ] , Zamestnanci . [ Meno ] " _

& " FROM Zamestnanci " _

& " WHERE ( ( ( Employees. [ Meno ] ) ako " " & ( dataString ) & " " ) ) ; " )
6

Vytvorenie " Pre ... Loop " zobraziť výsledky vrátené dotazom pomocou okna Immediate :

RST . MoveFirst

X = 0 K rst.RecordCount klipart

Debug.Print rst.Fields ( " [ krstné meno] " ) . Hodnota

Debug.Print rst.Fields ( " [ Priezvisko ] " ) Hodnota

rst.MoveNext

Ďalšie X
7

Dokončiť proces pridaním nasledujúceho kódu : .

rst.Close

dbs.Close

End Sub
8

Stlačte tlačidlo " Ctrl " a " G " sa zobrazí okno Immediate . Stlačením tlačidla " F5 " spustiť procedúru .

• Predchádzajúca strana: Číselné typy polí v aplikácii Microsoft Access 
• Ďalšia strana: Ako do centra formulár pomocou aplikácie Microsoft Access