Så här använder du Dir $ i VB6

Visual Basic-programmeringsspråket har fortfarande vissa användningsområden i modern programmering och applikationsutveckling, och som sådan kan du finna dig själv delving i sin syntax för att få ditt företags professionella applikationer att fungera med äldre appar eller kodbibliotek. Med hjälp av Dir $ -funktionen kan du enkelt se hur fil- och mappsökning görs via VB6.

1.

Använd Dir Dir-funktionen för att kontrollera om en fil finns. Om filen inte existerar returnerar funktionen en tom sträng. Följande kod bestämmer huruvida filen "example.txt" finns i katalogen C:

Om Dir $ ("C: \ example.txt") = "" Då Msgbox "inte här!" Annars Msgbox "här" Slut Om

2.

Använd Dir $ för att kontrollera om en katalog finns. Detta kommando är identiskt med det som kontrollerar om en fil existerar, men kräver att ett ytterligare argument, "vbDirectory", används i funktionssamtalet. Detta exempel kod kontrollerar förekomsten av en mapp med namnet "exempel" i C: partitionen:

Om Dir $ ("C: \ example", vbDirectory) = "" Då Msgbox "inte här!" Annars Msgbox "här" Slut Om

3.

Använd Dir $ för att lista innehållet i en katalog. Om du vet att en katalog finns kan du använda Dir $ för att lista filerna i den katalogen. Använd en variabel som heter "namn" genom att använda Dir $ tillsammans med en Do-While-loop för att dra namnet på varje fil i en katalog som har en .txt filtillägg:

Dim namnet som sträng

namn = Dir $ ("C: \ example * .txt") Gör tills namn = "" Skriv ut namnnamn = Dir $ () Loop