Programmering Microsoft Access indebærer at skrive programkode med Visual Basic for Applications ( VBA ) . VBA kan automatisere alle Access vigtigste funktioner , lige fra forespørge databasetabeller at spørge den person, indtaste data i en formular. Opret Sample data
Forinden nogen form for programmering , skal du eksempeldata. Begynde at skabe disse data ved at åbne Access og vælge "Ny" kommando til at lave en ny database. Oprette en film bord ved først at skrive sine feltnavne og vælge deres typer i " Tabel1 " fanen. Her er de feltnavne og typer indtastes:
tekstfelt: "title " Tekst feltet, " instruktøren " Number feltet, " year_released "
Enter to data rækker i tabellen , svarende til disse felter, du lige har oprettet. (Må ikke indeholde kommaer eller citationstegn ).
Række 1 : " star wars ", " lucas , " 1977row 2: " Excalibur ", " Boorman , " 1980
Gem database , indtastning "film" for tabellen navn, når bedt om det.
Opret en formular til indtastning af data
Din event-driven program kræver en form for at arbejde. Gøre en ved at vælge " Opret> guiden Formular ", vælger alle " Tilgængelige felter " undtagen "ID " for at kopiere til "Valgte felter " tekst område og derefter klikke på " Finish ".
Access åbne formularen i Form View . Højreklik et vilkårligt sted på formularen, og vælg " Design View ".
Tilføj en begivenhed Procedure
Nu skal du oprette en begivenhed procedure for filmen " Title " feltet. Når brugeren forsøger at fane væk fra dette område , efter at ændre det, vil dit program vise en besked boks , der kræver hende til at bekræfte eller annullere hendes valg.
Start ved at klikke på "Titel" tekstboksen og derefter klikke på " event " fanen i " Property Sheet ". I "Før update" række, klik på pil ned , og vælg "Event Procedure ", og klik derefter på knappen umiddelbart til højre for den pil ned.
Skriv kode til at vise bekræftelsesmeddelelsen < br >
Du automatisk i Visual Basic integrerede udviklingsmiljø (IDE) i en procedure, der vil køre, når brugeren ændrer filmtitel og derefter trykker på tabulatortasten. Indsæt følgende program kode i denne procedure så det ser ud som følger : Hej
Private Sub title_BeforeUpdate ( Cancel As Integer ) Dim respresp = MsgBox ( " Vil du virkelig ønsker at ændre denne rekord ? " , VbMsgBoxStyle.vbYesNo ) Såfremt ( resp. = VbMsgBoxResult.vbYes ) Så Afslut SubCancel = TrueEnd Sub
makroer
Retur til Access, og sikre, at makroer aktiveret for denne database ved at klikke på " Aktiver Indhold " knappen. Hvis dit program ikke kører , skal du ændre Trust Centers makroindstillinger ved at gøre følgende: Vælg " Filer> Indstillinger > Trust Center > Trust Center Indstillinger> Indstillinger for makro ", og klik derefter på "Aktiver alle makroer " valgmulighed
.
Test din Program
Dobbeltklik på "Film " form i " Alle Access-objekter " vinduet for at teste din kode. Klik inde i ( film ) " Title " feltet for enhver tekst, skrive eller slette noget tekst og derefter trykke på tabulatortasten. Den prompt vises. Klik på "Nej " til at holde cursoren i " Title" tekstboks eller "Ja" for at flytte til "direktør " feltet.
Experiment
Dette eksempel viste hvordan du opretter et svar til én type begivenhed . Men du kan tydeligt se i formularens designvisning mange andre typer af begivenheder . Eksperimenter med forskellige reaktioner på disse begivenheder ved at vise prompter eller ændrer teksten i andre områder med udsagn som følgende :
director = " "
< br >