Ako používať Microsoft Access vo Visual Basic 6

Takmer všetky užitočné počítačové programy vyžadujú databázu nejakého druhu . Microsoft uznal túto skutočnosť včas a robil databázový stroj Microsoft Access k dispozícii pre použitie s programami vyvinuté v aplikácii Visual Basic , počnúc VB 3. VB 6 Program môžete použiť Access Database Engine pomocou zložky s názvom " Microsoft Data Access Objects " alebo DAO . Využitie tohto komponentu , môžete dotaz , vložiť , aktualizovať a odstrániť v databáze prístup . Veci , ktoré budete potrebovať
Visual Basic 6.0
aplikácie Microsoft Access ( Office 97 alebo novší ) v Microsoft Data Access Objects ( zdarma na stiahnutie z webu Microsoft.com )
Zobraziť ďalšie inštrukcie

1

Spustenie nového projektu štandardné EXE v jazyku Visual Basic 6 ( VB ) spustením VB a výberom " štandardné EXE " v novom okne projektu , ktoré sa objavia . V ponuke projekt vyberte " Odkazy " . V zozname dostupných odkazov , vyhľadajte položku " Microsoft DAO xxx knižnica Object " , kde xxx je číslo verzie ( napr. 3.6 ) . Začiarknite políčko vedľa položky a kliknite na tlačidlo OK .
2

Otvorte databázu programu Access . Ak to chcete vykonať , dimenzia objekt typu databázy . Napríklad :

Dim db ako databáza

Potom použite predvolený pracovný priestor otvoriť databázový súbor . Napríklad :

Set db = Pracovné priestory ( 0 ) OpenDatabase . ( " C : \\ temp \\ congress.mdb " )

db objekt je teraz plne inicializovaný databázy pripravené byť vypočúvaný alebo aktualizované .
3

Otvorte záznamov z databázy a iterovat záznamov . Ak to chcete vykonať , dimenzia objektu Recordset a použiť databázový objekt k inicializácii :

Dim rs as RecordsetSet rs = db.OpenRecordset ( " Cong105 " , dbOpenDynaset )

V tomto príklade , tabuľka " Cong105 " sa otvára ako dynamická sada . Dynaset v tomto prípade znamená , že záznamov bude možné aktualizovať - ​​záznamy možno pridávať , aktualizovať a mazať . Záznamov je možné otvoriť aj ako dsOpenReadOnly , čo záznamov čítanie only.The záznamov otvorenie nemusí byť celá tabuľka . SQL ( Structured Query Language ) vyhlásenie možno otvoriť iba podmnožinu tabuľky . Napríklad :

Set rs = db.OpenRecordset ( " SELECT * FROM cong105 kde home_state = " NEW YORK " " , dbOpenDynaset )

To bude dotaz tabuľku Cong105 iba týchto záznamov s domovským štátom " v New Yorku . " iterovat záznamov a čítať hodnoty pomocou MoveNext a OSZ metódy záznamov . Napríklad v prípade , že formulár obsahuje textové pole s názvom Text1 ( s viacriadkové vlastnosť nastavená na hodnotu true a posuvníky nastavená na Vertical ) :

Text1.Text = " " Aj keď nie rs.EOFText1.Text = Text1.Text & ! ; ! rs Title & " " ! & rs fname & " " & rs lname a vbCrLfrs.MoveNextWend
4

Pridať záznam do záznamu nastaviť pomocou AddNew a metódy Aktualizovať . Zavolajte metódu AddNew vytvoriť prázdny záznam v množine záznamov . Nastavte hodnoty pre pole prázdneho záznamu a potom volanie metódy Update zachrániť tie nové hodnoty . Napríklad : !

Rs.AddNewrs fname = " test " rs lname = " Testovací Posledná " rs aktualizácia
5

Aktualizovať existujúci záznam pomocou Upraviť a aktualizovať metódy . Volanie metódy Edit umiestniť aktuálny záznam do režimu úprav . Nastavte hodnoty polí a potom volanie metódy Update uložte zmeny . Napríklad : !

Rs.Editrs lname = rs lname & " . Jr " rs Aktualizácia

• Predchádzajúca strana: Microsoft Access SQL Tutorial 
• Ďalšia strana: Ako sa naučiť Microsoft Access Online