Gewusst wie: Erstellen eine Microsoft Access-Programmierung-Funktion

January 17

Eine Funktion ist eine Einstell-Prozedur, die einen Wert zurückgibt. Sie können auch einen Wert darauf wie eine Prozedur übergeben. Funktionen werden in Microsoft Access mit Visual Basic für Applikationen (VBA) Programmiersprache programmiert.

VBA ist die Programmiersprache, die weitgehend für die Microsoft Office-Produkten verwendet. Im Interesse der in diesem Artikel werden wir eine einfache Funktion erstellen, die das Listenfeld auf einem Formular löschen wir erstellen.

Du musst wissen, die Grundlagen von Microsoft Access zu verstehen, wie manche Verfahren in diesem Artikel zu tun.

Anweisungen

Öffnen Sie das Programm

1 Öffnen Sie Microsoft Access, und starten Sie eine neue leere Datenbank.

2 Klicken Sie auf das Objekt "Forms" auf der Symbolleiste. Dieser befindet sich auf der linken Seite der Seite unter der Rubrik 'Objekte'.

3 Doppelklicken Sie auf "Formular in der Entwurfsansicht erstellen".

4 Fügen Sie ein ListBox-Steuerelement auf das Formular in der Entwurfsansicht. Wenn Sie aufgefordert werden, anzugeben Sie, dass Sie die Werte in automatisch während des Listbox-Assistenten eingeben. Geben Sie in "Äpfel", "Orangen", "Zitronen" und "Bananen" für die Listenelemente. Das Listenfeld "LstFruit" zu nennen. Beenden Sie die Schritte des Assistenten, und beachten Sie Ihre Listbox mit den Werten im Formular. Stellen Sie das Listenfeld Mehrfachauswahl im Eigenschaftenfenster vornehmen.

5 Fügen Sie eine Befehlsschaltfläche. Klicken Sie auf "Abbrechen", wenn der Assistent gestartet wird. Ihre Schaltfläche werden weiterhin auf der Seite. Nennen Sie die Befehlsschaltfläche "CmdClear" und die 'Caption'-Eigenschaft auf "Löschen".

6 Öffnen Sie das Visual Basic-Fenster durch Klicken auf den "Code"-Symbol in der Symbolleiste "Formularentwurf".

7 Geben Sie die folgende Funktion in das Codefenster ein:

Function ClearList(lst As ListBox) As Boolean

Dim VarItem As Variant

Wenn Lst. MultiSelect = 0 ThenLST = NullSonstFür jede VarItem In Lst. ItemsSelectedLST. Selected(varItem) = FalseNächsteEndIf

ClearList = True

EndFunction

Diese Funktion löscht die Auswahl aus einer Listbox beim Aufruf. Für die Funktion arbeiten musst du es nennen und übergeben Sie ein ListBox-Steuerelement zu.

8 Rufen Sie die Funktion aus dem CmdClear_Click-Verfahren wie folgt:

Private Sub cmd_Clear

ClearList(lstClear)

EndSub

Wie Sie sehen können, wir die 'ClearList'-Funktion aufgerufen und unsere 'LstClear' Listbox übergeben; der Funktion zu sagen, dass dies die Listbox ist, den wir verwenden möchten.

9 Testen Sie Ihre Funktion durch Klicken auf die Schaltfläche "CmdClear" in "Form"-Ansicht.

Tipps & Warnungen

  • Ich habe keine Fehlerbehandlung der oben genannten Funktion und Verfahren hinzufügen; Es ist ratsam Sie immer Fehlerbehandlung hinzufügen.

SIE KÖNNEN AUCH GERNE