PDA

View Full Version : سوال: دادن مسیر یک پوشه به file dialog



mehran5
یک شنبه 12 آبان 1387, 08:28 صبح
من میخوام از طریق file dialog یا هر چی دیگه مسیر یک پوشه رو به یه متغیر بر گردونم تا هر چی داخل پوشه هست رو در یک لیست باکس نشون بدم.ممنون میشم کسی کمکم کنه؟:لبخندساده:

rooshan2008
یک شنبه 12 آبان 1387, 10:10 صبح
سلام




Dim Fb AsNew FolderBrowserDialog
Dim listbox1 AsNew ListBox
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) HandlesMyBase.Load
''create list box

listbox1.Parent =

Me

listbox1.Show()

'---------------
Fb.ShowDialog()
If FileIO.FileSystem.DirectoryExists(Fb.SelectedPath) Then
For Each s In FileIO.FileSystem.GetFiles(Fb.SelectedPath)
listbox1.Items.Add(s)
Next
End If
End Sub





من قبلاً یه کنترول نوشته بودم :البته برای تمام فایل ها و پوشها هر مسیری با زیر پوشها .....

اینم لینکش :
http://barnamenevis.org/forum/showthread.php?t=127838

mehran5
یک شنبه 12 آبان 1387, 13:50 عصر
ممنون حالا اگه بحوایم فقط اسم فایلها در لیست باکس نشون داده بشه باید چه کا رکنیم؟