NEMA1375
سه شنبه 03 شهریور 1394, 15:45 عصر
سلام این کد همه ی فایل های داخل یک پوشه را با تمام زیر پوشه ها پیدا میکنه و در لیست باکس قرار میده
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
On Error Resume Next
(Dim Files() As String = IO.Directory.GetFiles("d:\mosic", "*.mp3", IO.SearchOption.AllDirectories
For i = 0 To Files.Length - 1
(ListBox1.Items.Add(Files(i
Next
End Sub
کد فوق فایل های که پسوند mp3 دارن رو در لیست باکس قرار میده
برای پیداکردن همه ی پسوند ها به جا *.mp3 بنویسید *.*
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
On Error Resume Next
(Dim Files() As String = IO.Directory.GetFiles("d:\mosic", "*.mp3", IO.SearchOption.AllDirectories
For i = 0 To Files.Length - 1
(ListBox1.Items.Add(Files(i
Next
End Sub
کد فوق فایل های که پسوند mp3 دارن رو در لیست باکس قرار میده
برای پیداکردن همه ی پسوند ها به جا *.mp3 بنویسید *.*