Работа с файлами и директориями в VB.NET

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

Пространство имен System.IO содержит типы, позволяющие осуществлять чтение и запись в файлы и потоки данных, а также типы для базовой поддержки файлов и папок.

Действиями с файлами:

IO.File.Create("D:/File.txt") ' Создаем новый файл
IO.File.Delete("D:/File.txt") ' Удаляем файл
IO.File.Copy("D:File.txt", "C:/File.txt") ' Копируем файл из диска D в C
IO.File.Move("D:File.txt", "D:/Работа/File1.txt") ' Перемещаем и изменяем имя файла
MsgBox(IO.File.GetCreationTime("D:/File.txt")) ' Дата создания файла
MsgBox(IO.File.GetAttributes("D:/File.txt")) ' Тип файла
Dim Файл As New IO.FileInfo("D:/File.txt")
MsgBox(Файл.Length & " байт") ' Размер файла в байтах, в следующих уроках мы будем узнавать размеры файлов в килобайтах и мегабайтах

Существует ли файл:

If IO.File.Exists("D:/File.txt") Then
MsgBox("Файл существует")
Else
MsgBox("Файл не существует")
End If

Сведения о файлах:

MsgBox(IO.Path.GetExtension("D:/File.txt")) ' Расширение файла результат будет .txt
MsgBox(IO.Path.GetFileName("D:/File.txt")) ' Имя файла без пути результат будет File.txt
MsgBox(IO.Path.GetFileNameWithoutExtension("D:/File.txt")) ' Имя файла без расширения результат будет File
MsgBox(IO.Path.GetFullPath("D:/File.txt")) ' Полное имя файла с путем результат будет D:/File.txt
MsgBox(IO.Path.GetPathRoot("D:/File.txt")) ' Имя корневого каталога результат будет D
MsgBox(IO.Directory.GetCurrentDirectory) ' Получаем путь каталога где находиться программа
MsgBox(Application.ExecutablePath) ' Получаем путь и имя исполняемого файла

Запись в файл(способов очень много, но я напишу всего два):

Добавьте на форму текстовое поле TextBox, в него мы будем вводить текст.

IO.File.WriteAllText("D:/File.txt", TextBox1.Text) ' Запись текста из TextBox1 в File.txt
' Другой способ
FileOpen(1, "D:/File.txt", OpenMode.Output)
Print(1, TextBox1.Text)
FileClose(1)

Чтение текста из файла:

TextBox1.Text = My.Computer.FileSystem.ReadAllText("D:/File.txt", System.Text.Encoding.GetEncoding(1251)) ' Считываем все строки в TextBox1 с кодировкой, указывайте такую кодировку и не будет проблем с отоброжение.
TextBox1.Text = IO.File.ReadAllText("D:/File.txt", System.Text.Encoding.GetEncoding(1251)) ' Тоже самое

На этом закончим наш урок, а через несколько уроков напишем свой Текстовый редактор.

77181501 1991571920x1080 300x168 Работа с файлами и директориями в VB.NET

Урок №11 - Дата и время в VB.NET    | Содержание | Урок №13 - Системные звуки и файлы в VB.NET