[Abu Ehab]

Directories In VB.Net
أولا يلــــــزمنا أن نستدعي IO
في
NameSpace

PHP كود :

Imports System.IO 


Create Directory

PHP كود :

Directory.CreateDirectory("F:\Abu Ehab") 


Delete Directory
يجـــب التنبــــــيه قبـــــل الحــــذف دائمــــــــا

PHP كود :

If MsgBox("Delete", MsgBoxStyle.YesNo) = MsgBoxResult.Yes Then
            Directory.Delete("F:\Abu Ehab")
        End If 


Get Directories
لأدراج جميع المجــــلدات في اللست بكس

PHP كود :

Dim Ste() As String
        Dim I As Integer
        Ste = Directory.GetDirectories("F:\")
        For I = 0 To Ste.Length - 1
            ListBox1.Items.Add(Ste(I))
        Next 


يتبـــــــــع