En funktion er et programmeringssprog procedure , der returnerer en værdi. Du kan også videregive en værdi til det som en procedure. Funktioner er programmeret ind i Microsoft Access med Visual Basic for Applications ( VBA ) programmeringssprog. VBA er det programmeringssprog i vid udstrækning anvendes til Microsoft Office-produkter . Af hensyn til denne artikel, vil vi være at skabe en simpel funktion , der vil rydde listbox på en formular , vi vil skabe . Du bliver nødt til at vide det grundlæggende i Microsoft Access til at forstå, hvordan man gør noget procedurerne i denne artikel. Instruktioner
Åbn menuen Program
1
Open Microsoft Access , og start en ny tom database.
2
Klik på " Formularer " objekt på værktøjslinjen Database . Dette er placeret på venstre side af siden under ' objekter ' overskrift.
3
Dobbeltklik på "Opret formular i designvisning ."
4 < p > Tilføj en listbox til formularen i designvisning. Når du bliver bedt , skal du angive , at du vil skrive værdierne i automatisk under listbox guiden. Skrive i " Æbler ", " Appelsiner ", " Citroner " og " Bananer " til din listepunkter. Navngiv listbox " lstFruit " . Afslut trinene for guiden og se dine listefelt med værdierne på formularen. Gør listbox i stand til at foretage flere valg fra vinduet Egenskaber .
5.
Tilføj en kommandoknap . Klik på knappen "Annuller" , når guiden starter . Din knap vil stadig være på siden . Navngiv kommandoknap " cmdClear " og sæt den " Caption " ejendom til " Clear" .
6
Åbn Visual Basic vindue ved at klikke på "Code " ikonet i " Form Design ' værktøjslinje.
7
Indtast følgende funktion i koden vinduet : Funktion clearList ( lst Da ListBox ) Som Boolean Dim varItem Som Variant , Hvis lst.MultiSelect = 0 Then lst = Null Else For Each varItem I lst.ItemsSelected lst.Selected ( varItem ) = False Næste End If clearList = Sand End Function Denne funktion rydder valg fra en listbox når den kaldes . For den funktion til at arbejde , bliver du nødt til at kalde det, og bestå en listbox det
8
Kald funktion fra cmdClear_Click proceduren som følger: . Private Sub cmd_Clear & # xD ; clearList ( lstClear ) End Sub Som du kan se , vi kaldte ' clearList ' funktionen og bestået vores ' lstClear ' listbox for det; fortæller den funktion , at dette er listbox vi ønsker at bruge .
9
Test ud af din funktion ved at klikke på " CmdClear " knappen i " Form " view.