Een functie is een programmeer procedure die een waarde retourneert . U kunt ook doorgeven van een waarde aan het als een procedure . Functies zijn geprogrammeerd in Microsoft Access met de Visual Basic for Applications ( VBA ) programmeertaal . VBA is de programmeertaal grotendeels gebruikt voor de Microsoft Office producten . Omwille van dit artikel zullen we het creëren van een eenvoudige functie die de keuzelijst zal duidelijk op een formulier wij zullen creëren. Je moet de basis van Microsoft Access weten om te begrijpen hoe om wat te doen procedures in dit artikel . Instructies
Open het Programma
Open Microsoft Access 1 en start een nieuwe lege database .
Klik 2 op de " formulieren" object op de werkbalk Database . Deze bevindt zich aan de linkerkant van de pagina onder het hoofd van de 'objecten ' .
3 Dubbelklik op " formulier maken in ontwerpweergave " .
4 Voeg een listbox om het formulier in de ontwerpweergave . Wanneer u wordt gevraagd , dat je de waarden in automatisch zal typt tijdens de listbox wizard. Typ in " Apples " , " Oranges " , " Citroenen " en " Bananas " voor uw lijst met items . Noem de listbox " lstFruit " . Werk de stappen voor de wizard en merkt dat uw listbox met de waarden op het formulier . Maak de listbox staat om meerdere selecties te maken uit het venster eigenschappen .
5 Een opdracht knop toevoegen . Klik op de knop "Annuleren " wanneer de wizard wordt gestart . Uw toets zal nog steeds op de pagina . Noem de opdrachtknop " cmdClear " en stel de ' Caption ' eigenschap in op " Clear " .
6 Open de Visual Basic -venster door te klikken op de "Code" icoon in het ' Form Design' toolbar .
type 7 in de volgende functie in het venster code : Function ClearList ( lst Zoals ListBox ) als Boolean Dim varItem als Variant ; Als lst.MultiSelect = 0 dan lst = Null Else Voor Elke varItem In lst.ItemsSelected lst.Selected ( varItem ) = False Next end If ClearList = True End Function Deze functie wist de selecties uit een keuzelijst als ze worden opgeroepen . Voor de functie te laten werken , moet je het ook noemt en passeren een listbox om het
8 Roep de functie van de cmdClear_Click procedure als volgt : . Private Sub cmd_Clear & # xD ; ClearList ( lstClear ) End Sub Zoals u kunt zien , hebben we de naam van de functie ' ClearList ' en voorbij onze ' lstClear ' listbox om het ; vertelt de functie dat dit de listbox we willen gebruiken .
Test 9 uit uw functie door te klikken op de knop " CmdClear ' in' Form ' view .
|
