Les partenaires publicitaires:

Comment créer une fonction de programmation de microsoft access

Une fonction est une procédure de programmation qui retourne une valeur. Vous pouvez également passer une valeur à lui comme une procédure. Les fonctions sont programmées dans Microsoft Access avec le Visual Basic pour Applications (VBA) langage de programmation.&# XD&# XD-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.&# XD&# XD-Vous aurez besoin de connaître les bases de Microsoft Access à comprendre comment faire certaines procédures dans cet article.

Ouvrez le programme

  • 1

    Ouvrez Microsoft Access et commencer une nouvelle base de données vide.

  • 2

    Cliquez sur le "Formulaires" Objet sur la barre d'outils de base de données. Il est situé sur le côté gauche de la page, sous la rubrique 'objets de.

  • 3


    Double-cliquez sur "Créer un formulaire en mode Création".

  • 4

    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 de liste déroulante. Taper "Pommes", "Oranges", "Citrons" et "Bananes" pour vos éléments de liste. Nommez la liste déroulante "lstFruit". Terminez les étapes de l'assistant et l'avis de votre liste avec les valeurs sur la forme. Faire la liste déroulante en mesure de faire des sélections multiples de la fenêtre des propriétés.

  • 5



    Ajouter un bouton de commande. Cliquez sur le "Annuler" bouton lorsque l'Assistant démarre. Votre bouton sera toujours sur la page. Nommez le bouton de commande "cmdClear" et définir la propriété «Légende» pour "Clair".

  • 6

    Ouvrez la fenêtre Visual Basic en cliquant sur le "Code" icône dans la barre d'outils de la «Form Design '.

  • 7

    Tapez la fonction suivante dans la fenêtre de code:&# XD&# XD Fonction ClearList (LST Comme ListBox) As Boolean&# XD &# XD Dim varItem As Variant&# XD&# XD Si lst.MultiSelect = 0 Then&# XD LST = Null&# XD Else&# XD Pour Chaque varItem Dans lst.ItemsSelected&# XD lst.Selected (varItem) = Faux&# XD Suivant&# XD End If&# XD&# XD ClearList = True&# XD &# XD End Function&# XD&# XD-Cette fonction efface les sélections d'une zone de liste lorsqu'il est appelé. Pour la fonction fonctionne, vous devrez l'appeler et de passer une zone de liste à elle.

  • 8

    Appelez la fonction de la procédure cmdClear_Click comme suit:&# XD&# XD Private Sub cmd_Clear&# XD&# XD ClearList (lstClear)&# XD &# XD End Sub&# XD&# XD-Comme vous pouvez le voir, nous avons appelé la fonction 'ClearList »et passé notre zone de liste' lstClear 'it-dire à la fonction que ce soit la zone de liste que nous voulons utiliser.

  • 9

    Testez votre fonction en cliquant sur le "CmdClear" bouton 'Form' vue.

Conseils & Avertissements

  • Je ne pas ajouter de la gestion des erreurs à la fonction ci-dessus et procédure- il est sage pour vous d'ajouter toujours la manutention d'erreur.
» » » » Comment créer une fonction de programmation de microsoft access