Работа с файлами в Visual Basic.NET

Как правило, программы оперируют большими массивами данных, которые могут храниться в различных местах. Чаще всего в качестве хранилища данных выстпуают файлы. Поэтому работа с файлами в Visual Basic.NET имеет большое значение. Например, в процессе работы программы нам может потребоваться считать текст из файла или произвести в него запись, удалить файл или целый каталог и так далее.

Основные возможности фреймворка .NET по управлению и манипуляции файлами и каталогами по большей части сосредоточены в пространстве имен System.IO. Классы этого пространства имен позволяют управлять файловым вводом-выводом. Рассмотрим некоторые из этих классов и их функциональность.

Работа с дисками

Для работы с дисками в пространстве имен System.IO имеется специальный класс DriveInfo.

В этом классе определен статический метод GetDrives, который возвращает имена всех логических дисков компьютера. Также он предоставляет ряд полезных свойств:

• AvailableFreeSpace: объем доступного свободного места на диске в байтах

• DriveFormat: имя файловой системы диска

• DriveType: тип диска

• IsReady: готов ли диск (например, DVD-диск может быть не вставлен в дисковод)

• Name: имя диска

• TotalFreeSpace: общий объем свободного места на диске в байтах

• TotalSize: общий размер диска в байтах

• VolumeLabel: получает или устанавливает метку тома

К примеру, выведем имена всех доступных дисков компьютера на консоль:

Imports System.IO

Module Module1

    Sub Main()

        Dim drives As DriveInfo() = DriveInfo.GetDrives()

        For Each disk As DriveInfo In drives
            Console.WriteLine("Название: {0}", disk.Name)
            Console.WriteLine("Тип: {0}", disk.DriveType)
            If disk.IsReady = True Then
                Console.WriteLine("Объем диска: {0}", disk.TotalSize)
                Console.WriteLine("Свободное пространство: {0}", disk.TotalFreeSpace)
                Console.WriteLine("Метка: {0}", disk.VolumeLabel)
            End If
               
            Console.WriteLine()
        Next

        Console.ReadLine()
    End Sub

End Module