Utvecklare bör kontrollera för existensen av en fil innan du försöker manipulera den . Om en programmerare försöker använda en fil som inte finns , kan en ansökan misslyckas eller ge felaktiga resultat . VB6 , även känd som Visual Basic 6 , inte har en funktion som heter " Se om den filen finns . " Men , gör det att du kan upptäcka förekomsten av en fil på en dator med hjälp av en indirekt metod . Instruktioner
1
Starta VB6 applikation och tryck på " Ctrl " och " N " för att öppna " New Project "-fönstret .
2
Dubbelklicka på " Standard EXEC " att skapa ett nytt projekt . VB6 visar en tom form i sin redigeringsfönstret .
3
Dubbelklicka på " Command "-knappen i verktygslådan för att placera den på formuläret .
4 < . p > Högerklicka på den knappen och klicka på " visa kod " för att visa koden fönstret
5
Placera följande kod innan " End Sub " uttalande som du ser i koden :
Dim fileToCheck As String
Dim Fileexists As Boolean
Dim katalognamn As String
Denna kod definierar tre variabler . Den " fileToCheck " variabel håller namnet på den fil vars existens du vill upptäcka . Den " Fileexists " variabel håller " true" eller "false" beroende på om filen finns . VB6 lagrar filens katalog namn i variabeln " katalognamn " om filen existerar
6
Placera följande kod nedanför koden som anges i föregående steg : .
FileToCheck = " C \\ : SomeFolder \\ SomeFile.txt "
katalognamn = Dir ( fileToCheck ) katalog p Om katalognamn = " "Då
Fileexists = False
Else
Fileexists = Sant
End If
MsgBox Fileexists
Ersätt " C : \\ SomeFolder \\ SomeFile.txt " med den fullständiga sökvägen till filen som du vill kontrollera . Till exempel , om du vill se om en fil som heter " music.jpg " finns i en mapp som heter " Media " på " D " drive , ersätt " C : \\ SomeFolder \\ SomeFile.txt " med " D : \\ Media \\ music.jpg . " Den nästa kodrad exekverar " Dir " -funktion . Det undersöker värdet av " fileToCheck . " Om " Dir " kommandot finner den angivna filen , lagrar den sitt katalognamn i variabeln " katalognamn . " Annars lagrar den ett tomt värde .
7
Tryck " F5 " för att köra programmet . När formuläret visas , klicka på knappen . Koden körs och ett meddelande rutan visar " sant" om filen du kontrolleras existerar . Om den filen inte finns , visas meddelanderutan " False . " Addera
