Slik bruker du Dir $ i VB6

Visual Basic-programmeringsspråket har fortsatt bruk i moderne programmerings- og applikasjonsutvikling, og som sådan kan du finne deg selv delving i sin syntaks for å få bedriftens profesjonelle applikasjoner til å fungere med eldre programmer eller kodebiblioteker. Ved hjelp av Dir $ -funksjonen kan du enkelt se hvordan fil- og mappesøking er gjort gjennom VB6.

1.

Bruk Dir $ -funksjonen til å sjekke om det finnes en fil. Hvis filen ikke eksisterer, returnerer funksjonen en tom streng. Følgende kode bestemmer hvorvidt filen "example.txt" finnes i katalogen C:

Hvis Dir $ ("C: \ example.txt") = "" Så Msgbox "ikke her!" Else Msgbox "her" Slutt hvis

2.

Bruk Dir $ for å sjekke om et katalog finnes. Denne kommandoen er identisk med den som kontrollerer om en fil eksisterer, men krever bruk av et ekstra argument, "vbDirectory", i funksjonssamtalen. Dette eksempelkoden kontrollerer eksistensen av en mappe som heter "eksempel" i C: partisjonen:

Hvis Dir $ ("C: \ example", vbDirectory) = "" Så Msgbox "ikke her!" Else Msgbox "her" Slutt hvis

3.

Bruk Dir $ for å liste innholdet i en katalog. Hvis du vet at det finnes en katalog, kan du bruke Dir $ for å liste filene i den katalogen. Bruk en variabel som heter "navn", bruk Dir $ sammen med en Do-While-sløyfe for å trekke navnet på hver fil i en katalog som har en .txt filutvidelse:

Dim navn Som String

navn = Dir $ ("C: \ example * .txt") Gjør til navn = "" Skriv ut navnnavn = Dir $ () Loop