The ADO (Active Data Objects ) Data Control ( ADODC ) er en ny metode lagt i Visual Basic 6.0 . Det gjør at en programmerer å sette kontroller, for eksempel etiketter , tekstbokser , lister og andre skjerminnstillinger kontroller , på et skjema og koble dem til Data Control , som deretter kobles til en database . Dette gir betydelig mer makt til utbygger i å skape og vedlikeholde databaser . Sette opp ADODC kan være komplisert , men å følge disse trinnene vil gjøre prosessen grei. Du trenger
Visual Basic 6.0
Vis flere instruksjoner
en

Høyreklikk på Visual Basic 6.0 programmet og velg " Kjør som Administrator. " Start et nytt prosjekt ved å klikke på " File" og deretter "New Project ". Velg "Data Project" mal fra listen.
2

Dobbeltklikk på " frmDataEnv " vises i "Data Project" listen til høyre . Plasser en ADO Data Control på skjemaet ved å dobbeltklikke på ADODC kontroll i verktøykassa til venstre på skjermen.
3

Sett opp en tilkobling til en eksisterende database ved å høyreklikke klikke på ADODC kontroll nå på skjemaet og velge " ADODC Egenskaper". På eiendommer siden , pass på at " Bruk Connection String " er valgt , og klikk på "Bygg ". Følg trinnene som vises , som vil lede deg gjennom å velge hvilken type data du skal bruke, hvor du finner databasen på datamaskinen, og om ikke å bruke et passord.
4

Klikk på " test Connection "-knappen på " Connection " kategorien data Link Properties når all informasjon fra trinn 3 er fullført. Hvis tilkoblingen mislykkes , gå tilbake og sjekker innstillingene valgt å koble til databasen.
5

Plasser to Knapper på fmDataEnv ved å dobbeltklikke på " Button" kontroll i Toolbox og deretter gjør dette igjen . Endre navnet på en knapp for å " cmdAddNewRecord " og Bildetekst til "Legg til ny rekord. " Endre navnet på den andre knappen til " cmdDeleteRecord " og Bildetekst til "Slett Record ".
6

Dobbeltklikk på " cmdAddNewRecord " og legg inn denne koden mellom begynnelsen og slutten av rutinen : " Adodc1.Recordset.AddNew . " Gjør det samme for cmdDeleteRecord "-knappen med denne koden : " . Adodc1.Recordset.Delete "( . Ikke ta perioden på slutten av denne koden )
7

Skriv inn koden til å ta vare av hva som skal skje når brukeren klikker på en av valgene i punkt 6: Private Sub Form_Load ( ) Adodc1.Recordset.ActiveConnection.BeginTransEnd SubPrivate Sub Form_Unload ( Cancel As Integer ) Hvis MsgBox ( "Godta registrere endringer ? " , vbYesNo ) = vbYes IfEnd Sub
8

Avslutt ADODC oppsett ved å legge til etiketter og TextBox kontroller i skjemaet for å opprette en mekanisme for en bruker å legge til eller slette poster . De spesifikke kontroller vil avhenge av databasen behov. Se bilde for et eksempel på hvordan dette vil se ut.