Programmering Microsoft Access innebär att skriva programkod med Visual Basic for Applications ( VBA ) . VBA kan automatisera alla Access- huvudfunktioner , från fråge databastabeller för att meddela den person som lägger till data i ett formulär . Skapa Sample Data
Innan du gör någon form av programmering , behöver du exempeldata . Börja skapa dessa data genom att öppna Access och välja " Ny " för att göra en ny databas . Skapa en film bord genom att först skriva sina fältnamn och välja sina slag i " Tabell1 " fliken . Här är fältnamnen och typer att ange :
textfält: " title " text fältet , " director " Number fältet " year_released "
Ange två data rader i tabellen , vilket motsvarar de fält som du just skapade . ( Inkludera inte kommatecken eller citattecken . ) Katalog
rad 1 : " star wars ", " Lucas " 1977row 2 : " excalibur , " " Boorman , " 1980
Spara databasen , ange " filmer " för tabellen namn när du ombeds göra detta .
Skapa ett formulär för inmatning av data
Din händelsestyrd programmet kräver ett formulär för att arbeta . Gör en genom att välja " Skapa > Form Wizard , " väljer alla " Tillgängliga fält " utom " ID " kopiera till " utvalda områden " text , och sedan klicka på " Finish . "
Access kommer att öppna formuläret i Form View . Högerklicka någonstans på formuläret och välj " Design. "
Lägg till ett evenemang Procedure
Nu ska du skapa en händelse förfarande för filmen " Titel" . När användaren försöker flik bort från detta område efter att ändra det , kommer ditt program visas en meddelanderuta som kräver henne att bekräfta eller avbryta hennes val . Genom att klicka på " Title " textrutan
Start och sedan klicka på " Event " fliken i " Egenskapsblad . " I " Innan uppdateringen " raden , klicka på nedpilen och välj "Event Procedure ", och klicka sedan på knappen omedelbart till höger om den nedåtpilen .
Skriv kod för att visa bekräftelsen
Du kommer automatiskt in i Visual Basic integrerad utvecklingsmiljö ( IDE ) i ett förfarande som kommer att köras när användaren ändrar filmtitel och sedan trycker på Tab-tangenten . Klistra in följande programkod i detta förfarande så att det ser ut som följer :
Private Sub title_BeforeUpdate ( Cancel As Integer ) Dim respresp = MsgBox ( " Vill du verkligen vill ändra på denna post ? " , VbMsgBoxStyle.vbYesNo ) Om ( resp = VbMsgBoxResult.vbYes ) sedan avsluta SubCancel = TrueEnd Sub
aktivera makron
Återgå till Access , och se till att makron är aktiverade för denna databas genom att klicka på " aktivera innehåll " -knappen . Om ditt program inte körs , ändra Säkerhetscenter s makroinställningar genom att göra följande: Välj " Arkiv> Alternativ > Säkerhetscenter > på Inställningar > Makroinställningar " och klicka sedan på " Aktivera alla makron " alternativet
.
testa programmet
Dubbelklicka på " filmer " formen i " All access Objects " fönstret för att testa din kod . Klicka inuti ( filmen ) " Titel " fältet för en post , skriva eller ta bort lite text och tryck på Tab-tangenten . Uppmaningen visas . Klicka på " Nej " för att hålla markören i " Title " textrutan eller " Yes " för att flytta till " direktören " fältet .
Experiment
Detta exempel visade hur du skapar en respons för en typ av händelse . Men du kan tydligt se i formulärets många designvyn andra typer av händelser . Experimentera med olika svar på dessa händelser genom att visa uppmaningarna eller ändra texten i andra områden med uttalanden som följande :
direktör = " " Addera
