Een functie is een programmering procedure die een waarde retourneert. U kunt ook een waarde doorgeven aan het zoals een procedure. Functies zijn geprogrammeerd in Microsoft Access met de Visual Basic for Applications (VBA) programmeertaal.
VBA is de programmeertaal die grotendeels gebruikt voor de Microsoft Office-producten. Omwille van dit artikel, zullen we het creëren van een eenvoudige functie dat zal duidelijk de listbox op een formulier dat we zullen creëren.
U moet de hoogte van de basisprincipes van Microsoft Access te begrijpen hoe het te doen sommige procedures in dit artikel.
Open het programma
Open Microsoft Access en start van een nieuwe, lege database.
Klik op het object 'Formulieren' op de werkbalk Database. Dit ligt aan de linkerkant van de pagina onder de kop 'objecten'.
Dubbelklik op "Formulier in de ontwerpweergave maken".
Een listbox toevoegen aan het formulier in de ontwerpweergave. Wanneer gevraagd, geeft u dat u automatisch de waarden in tijdens de listbox-wizard typen zal. Typ in "Appelen", "Oranges", "Citroenen" en "Bananen" voor items in de lijst. De naam van de keuzelijst "lstFruit". De stappen van de wizard hebt voltooid en merk uw listbox met de waarden op het formulier. Controleer de listbox kunnen meerdere selecties maken vanuit het eigenschappenvenster.
Een opdrachtknop toevoegen. Klik op de "Cancel" knop wanneer de wizard wordt gestart. Uw knop zal nog steeds worden op de pagina. Naam van de opdrachtknop "cmdClear" en stel de eigenschap 'Bijschrift' "Wissen".
De Visual Basic-venster openen door te klikken op de "Code"-pictogram in de werkbalk 'Formulierontwerp'.
Typ in de volgende functie in het codevenster:
Functie ClearList(lst As ListBox) As Boolean
Dim varItem As Variant
Als lst. MultiSelect = 0 Then
LST = Null
Anders
Voor elke varItem In de lst. ItemsSelected
LST. Selected(varItem) = False
Volgende
End IfClearList = True
End Function
Deze functie wist de selecties van een listbox wanneer aangeroepen. Voor de functie werkt, zul je een listbox doorgeven aan het te noemen.
De functie aanroepen vanuit de cmdClear_Click procedure als volgt:
Private Sub cmd_Clear
ClearList(lstClear)
End Sub
Zoals u zien kunt, wij de functie van 'ClearList' genoemd en doorgegeven onze listbox 'lstClear'; de functie te vertellen dat het hier de listbox die we willen gebruiken.
Uw functie testen door te klikken op de "CmdClear"-knop in de weergave 'Formulier'.
- Ik niet toe te voegen foutafhandeling aan de bovenstaande functie en procedure; het is verstandig voor u altijd foutafhandeling toevoegen.