|
Une fonction est une procédure de programmation qui retourne une valeur . Vous pouvez également passer une valeur pour elle comme une procédure. Les fonctions sont programmées dans Microsoft Access avec le Visual Basic pour Applications ( VBA) langage de programmation . VBA est le langage de programmation largement utilisé pour les produits Microsoft Office . Pour les besoins de cet article, nous allons créer une fonction simple qui va effacer la liste déroulante sur un formulaire que nous allons créer . Vous aurez besoin de connaître les bases de Microsoft Access à comprendre comment faire un certain procédures dans cet article. Instructions
Ouvrez le programme
1 Ouvrez Microsoft Access et commencer une nouvelle base de données vide .
2 Cliquez sur l'objet «Formulaires» sur la barre d'outils de base de données . Il est situé sur le côté gauche de la page sous la rubrique des «objets d' .
3 Double- cliquez sur" Créer un formulaire en mode Création " .
4 < p> Ajouter une zone de liste à la forme en mode Création . Lorsque vous êtes invité , spécifiez que vous entrez les valeurs automatiquement lors de l'Assistant zone de liste. Tapez " pommes ", " oranges ", " citrons " et " Bananes " pour vos éléments de liste. Nommez la liste déroulante " lstFruit " . Terminez les étapes de l'assistant et remarquer votre liste avec les valeurs du formulaire. Faire la liste déroulante en mesure d' effectuer des sélections multiples de la fenêtre des propriétés .
5 Ajouter un bouton de commande . Cliquez sur le bouton "Annuler" lorsque l'Assistant démarre . Votre bouton sera toujours sur la page. Nommez le bouton de commande " cmdClear " et définir la propriété " Caption " à "Clear" .
6 Ouvrez la fenêtre Visual Basic en cliquant sur l'icône "Code" dans la barre d'outils du « Form Design ».
7 type de dans la fonction suivante dans la fenêtre de code : ClearList de fonction (HNL Comme ListBox ) Comme varItem Dim Boolean As Variant , Si lst.MultiSelect = 0 Then HNL = Null Else For Each varItem En lst.ItemsSelected lst.Selected ( varItem ) = False Next End If ClearList = True End Function Cette fonction permet d'effacer les sélections à partir d'une zone de liste lorsqu'il est appelé . Pour la fonction de travail, vous devrez appeler et passer une zone de liste à elle
8 appeler la fonction de la procédure cmdClear_Click comme suit : . Private Sub cmd_Clear & # xD ; ClearList ( lstClear ) End Sub Comme vous pouvez le voir, nous avons appelé la fonction ' ClearList ' et transmis notre listbox ' lstClear »pour elle ; disait la fonction qu'il s'agit de la zone de liste que nous voulons utiliser .
9 Testez votre fonction en cliquant sur le bouton " CmdClear " en vue ' Form' .
|
