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é