Tutorial for MS Access programmering

Programmering Microsoft Access innebærer å skrive programkode med Visual Basic for Applications (VBA). VBA kan automatisere alle tilgangs hovedfunksjoner, fra spørring databasetabeller for å spørre personen å legge inn data i et skjema.

Opprett eksempeldata

Før du gjør noen form for programmering, trenger du eksempeldata. Begynn å lage denne informasjonen ved å åpne opp Access og velge "New" -kommandoen til å lage en ny database. Lag en film bord ved første å skrive sine feltnavn og velge deres typer i "Tabell 1" -kategorien. Her er feltnavn og typer å oppgi:

Tekstfelt: "title"
Tekstfelt, "regissør"
Antall felt, "year_released"

Tast inn to datarader i tabellen, tilsvarende de feltene du nettopp opprettet. (Ikke ta med komma eller anførselstegn.)

rad 1: "Star Wars", "Lucas," 1977
rad 2: "Excalibur", "Boorman," 1980

Lagre databasen, inn "filmer" for tabellen navn når du blir bedt om det.

Lag et skjema for Dataregistrering

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

Tilgang vil åpne skjema i skjemavisning. Høyreklikk hvor som helst på skjemaet, og velg "Design View."

Legg til en hendelse Prosedyre

Nå skal du lage et arrangement prosedyre for filmen "Title" feltet. Når brukeren prøver å kategorien bort fra dette feltet etter å ha endret det, vil programmet vise en meldingsboks som krever henne for å bekrefte eller avbryte hennes valg.

Start ved å klikke på "Tittel" tekstboksen og deretter klikke på "Event" kategorien i "Property Sheet". I "Før update" rad, klikker du pil ned og velg "Event Procedure", og klikk deretter på knappen umiddelbart til høyre for 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 programkoden til at prosedyren slik det ser ut som følger:

Private Sub title_BeforeUpdate (Cancel As Integer)
Dim resp
resp = MsgBox ( "Vil du virkelig ønsker å endre denne posten?», VbMsgBoxStyle.vbYesNo)
Hvis (resp = VbMsgBoxResult.vbYes) Then Exit Sub
Avbryt = True
End Sub

aktiver makroer

Gå tilbake til Access, og sørge for at makroer er aktivert for denne databasen ved å klikke på "Aktiver innhold" -knappen. Hvis programmet ikke kjører, endrer Trust senterets makroinnstillinger ved å gjøre følgende: Velg "File> Valg> Klareringssenter> Innstillinger for klareringssenter> Makroinnstillinger", og klikk deretter på "Aktiver alle makroer" alternativet.

Test Program

Dobbeltklikk på "filmer" form i "All Access Objects" vinduet for å teste koden din. Klikk i (filmen) "Title" feltet for noen registrering, type eller slette tekst, og trykk deretter på Tab-tasten. Den vises på skjermen. Klikk "Nei" for å holde markøren i "Tittel" tekstboksen eller "Ja" for å gå til "Director" -feltet.

Eksperiment

Dette eksemplet viser hvordan du oppretter en respons for en type arrangement. Men du kan tydelig se i skjemaets design se mange andre typer arrangement. Eksperimenter med ulike reaksjoner på disse hendelsene ved å vise meldingene eller endre teksten i andre felt med utsagn som følgende:

direktør = "<noen regissørens navn>"