Nwlapcug.com


Come creare una funzione di programmazione di Microsoft Access

Una funzione è una procedura di programmazione che restituisce un valore. È anche possibile passare un valore ad esso come una procedura. Funzioni sono programmate in Microsoft Access con Visual Basic for Applications (VBA) linguaggio di programmazione.

VBA è il linguaggio di programmazione in gran parte utilizzato per i prodotti Microsoft Office. Per il bene di questo articolo, ci sarà la creazione di una semplice funzione che sarà chiaro il controllo listbox in un form che creeremo.

Sarà necessario conoscere le nozioni di base di Microsoft Access per capire come fare alcune procedure in questo articolo.

Istruzioni

Aprire il programma

1

Aprire Microsoft Access e avviare un nuovo database vuoto.

2

Fare clic sull'oggetto "Forme" sulla barra degli strumenti Database. Questo si trova sul lato sinistro della pagina sotto il titolo di 'oggetti'.

3

Fare doppio clic su "Crea una maschera in visualizzazione struttura".

4

Aggiungere un controllo listbox al form in visualizzazione progettazione. Quando richiesto, specificare che si digita i valori automaticamente durante la creazione guidata casella di riepilogo. Digitare in "Mele", "Arance", "Limoni" e "Banane" per gli elementi dell'elenco. Nome del controllo listbox "lstFruit". Completare i passaggi della procedura guidata e notare la listbox con i valori del form. Rendere il controllo listbox in grado di effettuare selezioni multiple nella finestra Proprietà.

5

Aggiungere un pulsante di comando. Avvio della procedura guidata, fare clic sul pulsante "Annulla". Il pulsante sarà ancora nella pagina. Denominare il pulsante di comando "cmdClear" e impostare la proprietà 'Caption' "Clear".

6

Aprire la finestra di Visual Basic facendo clic sull'icona "Codice" nella barra degli strumenti 'Form Design'.

7

Digitare la seguente funzione nella finestra del codice:

Function ClearList(lst As ListBox) As Boolean

Dim varItem As Variant

Se lst. MultiSelect = 0 Then
LST = Null
Altro
Per ogni varItem In lst. ItemsSelected
lst. Selected(varItem) = False
Successivo
End If

ClearList = True

End Function

Questa funzione consente di cancellare le selezioni da una casella di riepilogo quando chiamato. Per la funzione al lavoro, sarà necessario chiamarlo e passare un oggetto listbox.

8

Chiamare la funzione dalla procedura cmdClear_Click come segue:

Private Sub cmd_Clear

ClearList(lstClear)

End Sub

Come potete vedere, abbiamo chiamato la funzione di 'ClearList' e passato la nostra listbox di 'lstClear'; raccontando la funzione che questo è il controllo listbox che vogliamo usare.

9

Testare la funzione cliccando sul pulsante "CmdClear" in vista di 'Form'.

Consigli & Avvertenze

  • Non ho aggiunto alcun errore gestisce la funzione di cui sopra e procedura; è saggio per poter sempre aggiungere la gestione degli errori.