Comprendre la fonction " Dir" dans Access vous aide à intégrer les opérations de gestion de fichiers dans votre Visual Basic pour Applications ( VBA) des programmes. Par exemple, vous pouvez utiliser " Dir" pour présenter l'individu en utilisant votre programme avec une liste de bases de données Access disponibles dans un répertoire particulier . Une fois, il choisit une base de données à ouvrir, vous pouvez utiliser la commande " OpenDatabase " pour le charger dans Access. Object Browser Description du

Une façon de comprendre la fonction " Dir" est de lire sa description dans l'Explorateur d'objets VBA. Ce navigateur est disponible en Programmation VBA l'environnement Access. Une fois que vous entrez dans cet environnement en cliquant sur " Visual Basic " l'onglet " développeur" ', cliquez sur " l' explorateur d'objets " du menu "Affichage " pour ouvrir le navigateur. Tapez " dir " dans le domaine des moteurs de recherche de votre navigateur pour retrouver la description de la fonction.
Programme montrant un fichier

Pour mieux comprendre la fonction Dir, exécuter un programme court qui l'utilise. Pour entrer dans l'environnement de développement Visual Basic de la fonction , le libre accès en cliquant sur " Visual Basic " de l'onglet "Developer " de . Collez le programme suit la présente section dans la nouvelle fenêtre qui apparaît. Ce programme utilise " Dir" pour identifier un seul fichier dans le répertoire "C: . \\ Windows " Pour exécuter le programme , cliquez sur l'une de ses déclarations, puis cliquez sur la commande "Exécuter" de l'onglet " Run" . Le programme affiche un message indiquant un fichier de "C: . \\ Windows "

Public Sub ShowFile ()

Dim f

f = Dir ( "c: \\ windows \\ " )

MsgBox f

End Sub

Arguments de Dir

La fonction" Dir " fonctionne différemment de la plupart des autres fonctions VBA . La première fois que vous l'appelez, vous devez le faire avec le nom d'un dossier , tel que «C : . \\ Windows " Après cette invocation initiale , cependant, vous pouvez appeler " Dir" sans arguments . Chaque fois que vous appelez cela de cette façon , " Dir" renvoie le nom d'un autre fichier dans le répertoire que vous aviez indiqué. " Dir" retourne une chaîne vide après avoir énuméré tous les fichiers dans le répertoire .
Lister tous les fichiers dans un répertoire

Pour voir comment " Dir" peut lister tous les fichiers dans un répertoire, collez le programme suivant dans l'environnement de développement d'Access . Cliquez sur une déclaration dans le programme, puis appuyez sur la touche "F5" ou cliquez sur la commande "Exécuter" du menu " Run" pour exécuter le programme. vous verrez la fenêtre " immédiate" afficher une liste de tous les fichiers dans le répertoire "c : \\ windows " . dossier

ShowFiles Public Sub ()

Dim f

f = Dir ( "c: \\ windows \\")

que ( f <> "" )

i = i + 1

Debug.Print f

f = Dir

Wend End Sub