Ako získať prístup Update otázku Prostredníctvom VB

Microsoft Access je skriptovací jazyk , Visual Basic for Applications ( VBA ) , ktoré môžete použiť na vykonanie databázové operácie , ako je vyberte a aktualizačných dotazoch . Programy VBA , ktoré vykonávajú tieto operácie vykonať s virtuálnymi objektmi , vrátane tých , ktoré zastupujú aktuálnu databázu sady záznamov , definícia dotazu a ďalšie databázové prvky . Robiť aktualizácie alebo akékoľvek databázové operácie vo VBA zahŕňa porozumenie , ako riadiť tieto objekty , ktoré sú zhromažďované do stromovej hierarchie volal " objektový model . " Vykonávanie aktualizačných dotazov pomocou jazyka Visual Basic umožňuje vývojárom rýchlo a s menším počtom šancí na užívateľské chyby meniť obsah databázy . Veci , ktoré budete potrebovať v Microsoft Access
Zobraziť ďalšie inštrukcie Cestuj 1

otvorený prístup a vytvoriť nasledujúce ukážkovú tabuľku , ktorá bude váš program jazyka robiť operácie aktualizácie na : vytvorenie poľa " pole1 " v tabuľke s názvom "Tabuľka 1 " , potom zadajte jeden záznam do tohto poľa : " . xyz "
2

Stlačte tlačidlo " Alt - F11 " zadať Visual Basic integrované vývojové prostredie ( IDE ) , potom kliknite na príkaz " Vložiť " menu v " Module " . Táto akcia vytvorí nový priestor pre vás na zadanie VB programu
3

Vložte alebo zadajte nasledujúci program do modulu kódu : .

Public Sub doUpdate ( )

Const TABBNAME = " Tabuľka 1 "

Dim dbs Ako DAO.Database

Dim rst Ako DAO.Recordset

Set DBS = CurrentDb

Set rst = dbs.OpenRecordset ( TABBNAME )

rst.MoveFirst

Do rst.EOF

Ak rst pole1 = " zxy ! " Potom

rst.Edit

rst ! pole1 = " abc "

rst.Update

rst.Close

dbs.Close

Exit Sub

End If

rst.MoveNext

Loop

End Sub

" OpenRecordset " vyhlásenie otvorí " Table1 " Tabuľka pre úpravu , a nastaví odkaz na tejto tabuľky sa " rst " premenné . Blok príkazov , ktorý začína " Do Do " a končí " Loop " sa pohybuje cez " rst " dát , vyhľadávanie záznamu , ktorého hodnota je " xyz " . Program používa " Edit " a " Update " metódy " rst " zmeniť hodnotu tohto záznamu , akonáhle nájde " xyz " rekord .
4

Spustite program kliknutím na niektorý z jej vyhlásenie , stlačením tlačidla " F5 " . Stlačte tlačidlo " Alt - F8 " sa vrátite do programu Access . Uvidíte " xyz " hodnotu , ktorú ste zadali predtým sa zmenil na " abc " .
5

Stlačte tlačidlo " Alt - F8 " sa vrátite do IDE . Zadajte nasledujúce nové vyhlásenie po poslednej " Dim " vyhlásenie v zozname programov : ( " Čo hodnota by ste chceli hľadať " )

f = InputBox

v. = InputBox ( " Čo hodnota by ste chceli zmeniť ? " )

Tieto výkazy dotaz užívateľa na hodnotu hľadať , a novú hodnotu zmeniť na .
6

Zadajte nad prehlásenie " Ak rst pole1 = ! " zxy " Potom " s týmto novým vyhlásením :

Ak rst pole1 = f Potom

vyhlásenie a ten v ďalšom kroku bude používať nový " f " a " v " premenné nájsť a aktualizovať správny záznam v tabuľke
7

prepíšte vyhlásenie . " rst pole1 = " abc " , " s týmto tvrdením : !

RST ! pole1 = v
8

spustite program , rovnako ako v kroku 4. Odpovedzte na výzvy , kedy potom sa objaví , zadaním " abc " na hodnotu hľadať , a " xyz " na hodnotu zmeniť na . Revidovaný program zmení " abc " na " xyz " .

• Predchádzajúca strana: Čo je OCX vo Visual Basic 
• Ďalšia strana: Ako používať VBA čítať dokumentu programu Microsoft Word