Brukere av database applikasjon, Microsoft Access , noen ganger bruke makroer til å behandle sine data , inkludert sletting av data . Makroer programmer skrevet i Visual Basic for Applications ( VBA ) , og kan automatisere en oppgave gjort via Access ' standard brukergrensesnitt. Slette data med VBA kan ta ulike former , avhengig av om dataene som skal slettes er en hel kolonne eller annen database objekt. Slette data med makroer - i motsetning til manuelle metoder - sparer tid , og er mindre utsatt for feil enn manuell sletting . Du trenger
Microsoft Access
Vis flere instruksjoner
en
Åpne Microsoft Access og opprette en ny database ved å trykke " Ctrl- N ", etterfulgt ved å klikke på "Blank database . " Du vil lage et lite bord for denne databasen , og deretter bruke makroer til å slette data fra den.
2
Klikk "Table " under "Create" -menyen , skriv " Varenavn " i øverste rad av bordet nettets andre kolonnen. Type " pris" i cellen direkte til høyre for " ProductName . "
3
type en eller to rader med eksempeldata i cellene nedenfor de kolonnenavn du nettopp har skrevet. For eksempel skrive "Komprimert trekull , " og " 1,98 " for en kunst forsyning tabellen .
4
Trykk "Ctrl -S " og trykk " OK" lagre tabellen med standard navnet " Table1 . "
5
Trykk" Alt- F11 "å gå inn VBA integrerte utviklingsmiljø ( IDE ) , klikk deretter på " Module "under" Insert "-menyen for å gjøre et nytt vindu for å skrive inn programmets makro kode .
6
Lim inn følgende program i vinduet. Dette programmet fungerer ved å åpne en RecordSet gjenstand for gjeldende database . Den RecordSet er basert på " Table1 " tabellen du ferdig i trinn 4 . Den MoveFirst metoden (dvs. funksjon ) av RecordSet flytter nåværende rekorden pekeren til bordet første plate ; . De Slett metoden sletter den første posten
Public Sub DeleteRecord ( )
Dim db As DAO . Database
Dim rcset Som DAO.Recordset
Dim str As String
Sett db = CurrentDb
Set rcset = Sub
7
Kjør slett makro ved å klikke på noen av sine uttalelser , og deretter trykke "F5 ". Trykk "Alt- F11 " for å gå tilbake til standard Access- brukergrensesnittet , deretter dobbeltklikk på " Tabell 1 "-ikonet i Access navigasjon panelet , som er på skjermen igjen . Tilgang vil åpne " Table1 " for å avsløre at den første posten du skrev inn i trinn 3 er slettet .
8
Trykk " Alt- F11 " for å gå tilbake til makro kode i IDE, deretter limer du inn følgende nytt program under den forrige du skrev . Dette programmet sletter " Pris "-feltet fra bordet ved å kalle på "Delete "-metoden for « Table1 . "
Public Sub DeleteField ( )
Dim db As DAO.Database
< p> Dim rcset Som DAO.Recordset
Dim myTab Som TableDef
Set db = CurrentDb
Sett myTab = db.TableDefs ( " Tabell 1 ")
< p > myTab.Fields.Delete ( "prisen")
db.Close
End Sub
9
Kjør programmet som du gjorde den forrige, og dobbel - klikk " Tabell 1 " i navigasjonsruten for å kontrollere at " Pris "-feltet er borte.