Postupy: Jak zjistit v jazyce Visual Basic kolik souboru je v adresáři
Můžete použít metodu GetFiles, která vrátí needitovatelnou kolekci řetězců reprezentující názvy souborů v zadaném adresáři. Poté můžete použít vlastnost Count k určení počtu souborů.
K určení počtu souborů v adresáři
Použijte GetFiles metodu, která vrátí kolekci souborů v určeném adresář. V tomto příkladu metoda vrátí soubory v adresáři s názvem TestDir.
Dim counter = My.Computer.FileSystem.GetFiles("C:\TestDir")
Poté můžete použít vlastnost Count k určení počtu souborů. V tomto příkladu zobrazujeme výsledek v okně.
MsgBox("number of files is " & CStr(counter.Count))
Příklad
Tento příklad, který představuje výše uvedený fragment kódu v úplné podobě, spočítá počet souborů v adresáři TestDir a zobrazí výsledek v okně.
Dim counter = My.Computer.FileSystem.GetFiles("C:\TestDir")
MsgBox("number of files is " & CStr(counter.Count))
Probíhá kompilace kódu
Tento příklad vyžaduje:
Přístup k členy System.Collections obor názvů. Přidejte příkaz Imports , pokud plně nekvalifikujete názvy ve vašem kódu. Další informace naleznete v tématu Imports Statement (.NET Namespace and Type).
Adresář s názvem TestDir v zadaném umístění. Cestu nahraďte cestou k adresáři, který chcete zkontrolovat.
Robustní programování
Následující podmínky mohou způsobit výjimku:
Cesta není platná z některého z následujících důvodů: Jedná se o řetězec s nulovou délkou, obsahuje pouze prázdné znaky, obsahuje neplatné znaky nebo se jedná o cestu k zařízení (začíná \\). \) (ArgumentException).
Cesta není platná, protože je nastavená na Nothing (ArgumentNullException).
Adresář neexistuje nebo se jedná o soubor DirectoryNotFoundException).
directory odkazuje na existující soubor (IOException).
Cesta přesahuje maximální systémem povolenou délku (PathTooLongException).
Název souboru nebo adresáře v cestě obsahuje dvojtečku (:) nebo je v neplatném formátu (NotSupportedException).
Uživatel nemá potřebné oprávnění k zobrazení cesta (SecurityException).
Uživatel nemá potřebná oprávnění (UnauthorizedAccessException).
Viz také
Úkoly
Postupy: Jak získat kolekci souborů adresáře v jazyce Visual Basic
Postupy: Hledání souborů pomocí konkrétního vzoru v jazyce Visual Basic
Odkaz
Další zdroje
Vlastnosti souboru, adresáře a jednotky v jazyce Visual Basic