Programmering Microsoft Access innebærer å skrive programkode med Visual Basic for Applications ( VBA ) . VBA kan automatisere alle Tilgang viktigste funksjoner , fra søkene databasetabeller å spørre person inn data i et skjema . Lag Sample data

Før du gjør noen form for programmering, må du eksempeldata. Begynne å lage disse dataene ved å åpne opp tilgang til og velge "Ny" -kommandoen for å lage en ny database . Lag en film tabellen etter første skrive sine feltnavn og velge deres typer i " Table1 "-kategorien . Her er de feltnavnene og typer å skrive inn :

tekstfelt: "title " Tekst -feltet , "regissør " Number feltet , " year_released "

Enter to data rader i tabellen , tilsvarende disse feltene du nettopp opprettet . ( Ikke ta med komma eller anførselstegn . )

Rad 1 : " star wars ", " lucas , " 1977row 2 : " Excalibur ", " Boorman , " 1980

Lagre database , inn " filmer" for tabellen navn når du blir bedt om det.
Lag et skjema for Data Entry

hendelsesdrevet programmet krever en form for å fungere. Gjør en ved å velge "Create > Form Wizard , " velge alle "Tilgjengelige felt " unntatt " ID " for å kopiere til " Selected Fields " tekstområdet , og deretter klikke på " Finish".

Tilgang vil åpne skjemaet i danne View. Høyreklikk hvor som helst på skjemaet , og velg " Design View. "
Legg en Hendelsesprosedyre

Nå vil opprette en hendelse prosedyre for filmen "Tittel" feltet . Når brukeren forsøker å fane bort fra dette feltet etter å ha endret det, vil programmet vise en meldingsboks som krever henne til å bekrefte eller avbryte hennes valg .

Start ved å klikke på "Tittel" tekstboksen og deretter klikke på " Event " kategorien i " Property skjema . " I " Før oppdateringen " raden , klikker du pil ned og velg " Hendelsesprosedyre ", og klikk deretter på knappen umiddelbart til høyre pil ned .
Skriv kode for å vise bekreftelsesmeldingen

Du vil automatisk gå inn i Visual Basic integrert utviklingsmiljø (IDE ) inne i en prosedyre som vil kjøre når brukeren endrer filmtittel og deretter trykker på Tab-tasten . Lim inn følgende programkode inn i den prosedyren slik det ser ut som følger : en

Private Sub title_BeforeUpdate ( Cancel As Integer ) Dim respresp = MsgBox ( "Vil du virkelig ønsker å endre denne posten ? " , VbMsgBoxStyle.vbYesNo ) Hvis (resp = VbMsgBoxResult.vbYes ) Then Exit SubCancel = TrueEnd Sub
Aktiver makroer

Tilbake til Access , og sikre at makroer er aktivert for denne databasen ved å klikke på " aktiver innhold "-knappen . Hvis programmet ikke kjører , endre Trust senterets makroinnstillinger ved å gjøre følgende : Velg "File > Valg > Klareringssenter > Klareringssenter Innstillinger> Macro Settings", og klikk deretter på " Aktiver alle makroer " alternativet
.
teste programmet

Dobbeltklikk på " filmer " form i " All Access Objects " vinduet for å teste koden . Klikk i ( film ) "Tittel" feltet for noen rekord , skrive eller slette tekst, og trykk deretter på Tab-tasten . Ledeteksten vises. Klikk "Nei " for å holde markøren i "Tittel" tekstboksen eller " Ja" for å flytte til " Director" feltet .
Experiment

Dette eksemplet viser deg hvordan du oppretter en reaksjon for en type hendelse. Men du kan tydelig se i skjemaets utformingsvisning mange andre typer hendelser . Eksperimentere med ulike reaksjoner på slike hendelser ved å vise meldingene eller endre teksten på andre felt med utsagn som følgende :

direktør = " "