Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky
Otvorte databázu v programe Microsoft Access 2007 a otvorte Editor jazyka Visual Basic . Kliknite na záložku " Database Tools " a " jazyka " od " Makrá a kód " skupiny .
2
Kliknite na " Vložiť " menu v editore jazyka Visual Basic a potom kliknite na " Module " . Alebo , ak máte formu alebo predchádzajúce modul , ktorý chcete použiť tento postup , otvorený , že namiesto toho , dvojitým kliknutím na neho z okna Prehliadač projektu na ľavej strane obrazovky .
3
Napíšte procedúru , ktorá bude ťahať záznamov z databázy :
" Sub RecordsetExample ( )
Dim dbTest ako databáza " premennú , ktorá bude držať svojej databáze
Dim rsRecordset as Recordset ' premennú , ktorá sa bude držať svojej sady záznamov
Set dbTest = OpenDatabase ( " MyDatabase.mbd " ) "Zmeniť to na názov databázy
s dbTest
nastaviť rsRecordset = . OpenRecordset ( " Table1 " , dbOpenTable ) " Zmena Table1 na názov vášho stola
End With "
4
Napíšte kód , skopírujte záznamov do inej tabuľky . Kód vyzerá takto :
" Dim SQLStatement ako String
" dotaz vložiť do tabuľky Zmeniť tabulka2 na názov vášho stola
SQLStatement . = " INSERT INTO tabulka2 Dlhodobý HODNOTY " a rsRecordset
Kým nie rsRecordset.EOF
End With "
5
Kliknite na ikonu " Uložiť " v editore jazyka Visual Basic . Kliknite na tlačidlo " Spustiť ( ! ) " , Ak by ste chceli spustiť procedúru a skopírujte záznamov do tabuľky teraz . Ak nie , zatvorte Editor jazyka Visual Basic a kliknite na tlačidlo " Office " a potom na " Save " pre uloženie zmien do databázy .
Copyright © počítačové znalosti Všetky práva vyhradené