Funktio etsii tiedostoja ja hakemistoja.
Dir(tiedostokuvaus[, attribuutit])
Funktio etsii tiedostoja ja hakemistoja tiedostokuvauksen ilmoittamasta hakemistopolusta. Tiedostokuvaus voi sisältää DOS:in jokerimerkkejä, jotka mahdollistavat tiedostojen valitsemisen tiettyjen sääntöjen, kuten nimen alkukirjaimen tai päätteen, perusteella.
Tiedostokuvaus ja attribuutit annetaan vain silloin, kun funktiota kutsutaan ensimmäisen kerran. Seuraavilla kerroilla parametrejä ei tarvita. Funktio palauttaa aina seuraavan tiedoston nimen hakemistosta, kunnes tiedostoja ei enää ole, jolloin funktio palauttaa tyhjän merkkijonon.
Attribuutit on joku seuraavista tai useampi arvo yhteenlaskettuna.
| arvo | vakio | kuvaus |
| 0 | vbNormal | Etsii tavallisia tiedostoja (oletus). |
| 1 | vbReadOnly | Etsii myös kirjoitussuojattuja tiedostoja. |
| 2 | vbHidden | Etsii myös piilotiedostoja. |
| 4 | vbSystem | Etsii myös systeemitiedostoja. |
| 8 | vbVolume | Etsii levyn nimen. |
| 16 | vbDirectory | Etsii myös hakemistoja. |
| 32 | vbArchive | Etsii myös arkistoituja tiedostoja. |
Esimerkki:
Dim tiedosto As String
'etsii juurihakemiston tekstitiedostot
tiedosto = Dir("c:\*.txt")
Do Until tiedosto = ""
Debug.Print tiedosto
tiedosto = Dir
Loop
'etsii piilo- ja systeemitiedostot tavallisten lisäksi
tiedosto = Dir("c:\", vbHidden + vbSystem)
Do Until tiedosto = ""
Debug.Print tiedosto
tiedosto = Dir
Loop