Программирование
Веб программирование

Папки в vb net. Класс Directory

 
 

Для работы с папками в .Net есть класс Directory. Если ты изучал VB6, то ты наверное вспомнишь стандартные функции VB для работы с папками(MkDir - создание папки, RmDir - удаление...). В VB.Net они сохранились, но про них писать я не буду, т.к. возможности стандартных функций ограниченны, а при помощи класса Directory можно намного легче и с большими возможностями работать с папками.
Итак, начнем:
На форме размести 5 кнопок:

Button1 - измени свойство Text на "Создать папку"
Button2 - измени свойство Text на "Удалить"
Button3 - измени свойство Text на "Переместить"
Button4 - измени свойство Text на "ИНФО"
Button5 - измени свойство Text на "Переименовать"

Теперь код:

Imports System
Imports System.IO

Public Class Form1
Inherits System.Windows.Forms.Form
Dim dir As Directory ' Объявляем переменную Dir для работы с папками

Windows Form Designer generated code

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dir.CreateDirectory("D:1") ' Создаем папку с именем 1
End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
dir.Delete("D:1") ' Удаляем папку
End Sub

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
dir.Move("D:1", "D:Test1")' Переносим
End Sub

Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click
dir.Move("D:1", "D:2")' Переименовываем
End Sub

Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
MsgBox("Папка создана: " & dir.GetCreationTime("D:1"))
MsgBox("Папка открыта: " & dir.GetLastAccessTime("D:1"))
MsgBox("Папка изменена: " & dir.GetLastWriteTime("D:1"))
End Sub
End Class

Исходник


Есть вопросы? Спроси на нашем форуме!!
anvar_876@mail.ru [15.06.2011 02:40]

возможно ли скачать этот учебник? Если да, то укажите, пожалуйста, ссылку

Nomus [15.06.2011 02:54]

если импортировать NameSpase
imports system.io.directoryinfo, тогда
можно обходится без создания переменного dir - например,
CreateDirectory(InputBox("Введите путь","Ввод данных"))
(методы в примерах статические - Shared и принадлежат классу)

66demon66610 [19.08.2014 22:02]

А в чем тут разница между перемещением и переименовыванием?



Оставлять комментарии можно только зарегистрированным




Предупреждение: Вся информация представлена исключительно в образовательных целях.
Ни авторы, ни администрация не несут ответственности в случае ее использования в противозаконных целях.