Практическое руководство. Определение числа файлов в каталоге в Visual Basic
Обновлен: Ноябрь 2007
Метод My.Computer.FileSystem.GetFiles можно использовать для получения коллекции строк только для чтения, представляющих имена файлов в указанном каталоге. Затем можно использовать свойство Count для определения числа файлов.
Чтобы определить число файлов в каталоге
Используйте метод GetFiles для получения коллекции файлов в указанном каталоге. Этот пример возвращает файлы в каталоге TestDir.
Dim counter As _ System.Collections.ObjectModel.ReadOnlyCollection(Of String) counter = My.Computer.FileSystem.GetFiles("C:\TestDir")
Свойство Count используется для определения количества файлов в коллекции. В этом примере результат отображается в окне сообщения.
MsgBox("number of files is " & CStr(counter.Count))
Пример
В этом примере, который представляет вышеописанный фрагмент в полной форме, подсчитывается число файлов в каталоге TestDir. Результат возвращается в окне сообщения.
Dim counter As _
System.Collections.ObjectModel.ReadOnlyCollection(Of String)
counter = My.Computer.FileSystem.GetFiles("C:\TestDir")
MsgBox("number of files is " & CStr(counter.Count))
Компиляция кода
Для этого примера необходимо следующее.
Доступ к членам пространства имен System.Collections. Добавьте инструкцию Imports, если в коде не указываются полные имена элементов. Дополнительные сведения см. в разделе Оператор Imports (пространство имен .NET и тип).
Каталог TestDir находится в указанном местоположении. Замените путь на путь к каталогу, в котором необходимо осуществить операцию.
Отказоустойчивость
Исключение может возникнуть при следующих условиях.
Путь является недопустимым по одной из следующих причин: это строка нулевой длины (пустая строка); она содержит только пробелы; она содержит недопустимые знаки; или это путь устройства (начинается с \\.\) (ArgumentException).
Путь не является допустимым, поскольку он равен Nothing (ArgumentNullException).
Каталог не существует или является файлом (DirectoryNotFoundException).
Параметр directory указывает на существующий файл (IOException).
Длина пути превышает максимальную длину, определенную в системе (PathTooLongException).
Имя файла или папки в пути содержит двоеточие (:) или имеет недопустимый формат (NotSupportedException).
У пользователя отсутствуют необходимые разрешения на просмотр пути (SecurityException).
Пользователь не имеет необходимых разрешений (UnauthorizedAccessException).
См. также
Задачи
Практическое руководство. Получение коллекции содержащихся в каталоге файлов в Visual Basic
Практическое руководство. Поиск файлов с конкретным шаблоном в Visual Basic
Ссылки
Метод My.Computer.FileSystem.GetFiles