Hoe Dir $ in VB6 te gebruiken

De Visual Basic-programmeertaal heeft nog steeds een aantal toepassingen in de moderne programmering en applicatie-ontwikkeling, en daarom kan het zijn dat je je verdiept in de syntaxis om professionele applicaties van je bedrijf te laten werken met oudere apps of codebibliotheken. Met behulp van de Dir $ -functie kunt u gemakkelijk zien hoe het zoeken van bestanden en mappen wordt gedaan via VB6.

1.

Gebruik de functie Dir $ om te controleren of een bestand bestaat. Als het bestand niet bestaat, retourneert de functie een lege reeks. De volgende code bepaalt of het bestand "example.txt" al dan niet bestaat in de map C:

If Dir $ ("C: \ example.txt") = "" Then Msgbox "not here!" Anders Msgbox "hier" Einde als

2.

Gebruik Dir $ om te controleren of een map bestaat. Deze opdracht is identiek aan degene die controleert of een bestand bestaat, maar vereist het gebruik van een extra argument, "vbDirectory", in de functieaanroep. Deze voorbeeldcode controleert op het bestaan ​​van een map met de naam "example" in de C: -partitie:

If Dir $ ("C: \ example", vbDirectory) = "" Then Msgbox "not here!" Anders Msgbox "hier" Einde als

3.

Gebruik Dir $ om de inhoud van een map te vermelden. Als u weet dat er een directory bestaat, kunt u Dir $ gebruiken om de bestanden in die map weer te geven. Gebruik een variabele genaamd "name" en gebruik Dir $ samen met een Do-While-lus om de naam van elk bestand in een map met de extensie .txt te zetten:

Dimnaam als string

name = Dir $ ("C: \ example * .txt") Do Until name = "" Naam afdruknaam = Dir $ () Loop