(14-12-15, 01:44 AM)hamada558 كتب : [ -> ]متل هاد متلا
كود :
Dim directories() As String = IO.Directory.GetFiles("C:\", "*.*", IO.SearchOption.AllDirectories)
ListBox1.Items.AddRange(directories)
لكل الملفات والمسارات والمسارات الفرعية :
PHP كود :
Dim files() As String = IO.Directory.GetFiles("C:\", "*.*", IO.SearchOption.AllDirectories) Dim directories() As String = IO.Directory.GetDirectories("C:\", "*.*", IO.SearchOption.AllDirectories) ListBox1.Items.AddRange(files) ListBox1.Items.AddRange(directories)