Ako skontrolovať , či súbor existuje vo VB6

Vývojári by mali overiť existenciu súboru pred pokusom manipulovať s ním . Ak sa pokúsi programátor použiť súbor , ktorý nie je prítomný , aplikácia môže zlyhať alebo generovať nepresné výsledky . VB6 , tiež známy ako Visual Basic 6 , nemá funkcia s názvom " Pozrite sa , či tento súbor existuje . " Avšak , to vám umožní odhaliť prítomnosť ľubovoľného súboru na počítači pomocou nepriamej metódy . Pokyny dovolená 1

Spustite aplikáciu VB6 a stlačte " Ctrl " a " N " a otvorí sa okno " New Project " .
2

Double - kliknite na " Štandardné EXEC " vytvoriť nový projekt . VB6 zobrazí prázdny formulár v jeho editačnom okne .
3

Double - kliknite na tlačidlo " príkaz " sa nachádza v paneli nástrojov umiestnite ho na formulári .
4 < . p > pravým tlačidlom myši na toto tlačidlo a kliknite na tlačidlo " Zobraziť kód " zobrazíte okno kód
5

Umiestnite nasledujúci kód pred " End Sub " vyhlásenie , ktoré vidíte v kóde :

Dim fileToCheck As String Dim

fileexists As Boolean

Dim DirectoryName As String

Tento kód definuje tri premenné . " FileToCheck " premenná má názov súboru , ktorého existencia , ktorú chcete zistiť . " FileExists " premenná má " true " alebo " false " v závislosti na tom , či súbor existuje . VB6 ukladá názov adresára v súbore v premennej s názvom " DirectoryName " , ak súbor existuje
6

Umiestnite nasledujúci kód pod kód uvedený v predchádzajúcom kroku : .

FileToCheck = " C \\ : SomeFolder \\ SomeFile.txt "

DirectoryName = Dir ( fileToCheck )

Ak DirectoryName = " " Tak

fileexists = False

Else

fileexists = TRUE

End If

MsgBox fileexists

Nahradiť " C : \\ SomeFolder \\ SomeFile.txt " sa úplný názov cesty k súboru , ktorý chcete skontrolovať. Napríklad , ak chcete zistiť , či súbor s názvom " music.jpg " existuje v priečinku s názvom " Médiá " na " D " pohon , nahradiť " C : \\ SomeFolder \\ SomeFile.txt " s " D : \\ Médiá \\ music.jpg . " Ďalší riadok kódu spustí funkciu " Dir " . To skúma hodnotu " fileToCheck . " Ak príkaz " dir " nájde zadaný súbor , uloží jeho názov adresára v premennej s názvom " DirectoryName . " V opačnom prípade ukladá prázdnu hodnotu .
7

Stlačte " F5 " pre spustenie aplikácie . Akonáhle sa zobrazí formulár , kliknite na tlačidlo . Kód beží , a okno s hlásením sa zobrazí " To je pravda " , ak súbor , ktorý kontroluje existuje . Ak neexistuje , že súbor sa správou zobrazí " False " .

• Predchádzajúca strana: Ako obmedziť textové pole , len čísla v aplikácii Visual Basic 6.0 
• Ďalšia strana: Ako vytvoriť textový súbor v jazyku Visual Basic 6