24-09-19, 04:28 PM
(آخر تعديل لهذه المشاركة : 24-09-19, 04:52 PM {2} بواسطة EMAD268716.)
(24-09-19, 01:52 AM)ابراهيم ايبو كتب : السلام عليكم اخي الكريم
لتحديد مجلد وجلب اسمه سنحتاج الى اداة FolderBrowserDialog
انشئ مشروع جديد وضع 2 تكست بوكس و1 بوتون وضع هذا الكود في البوتن
التكست بوكس 1 يجلب المسار مع اسم المجلد والتكست بوكس 2 يجلب اسم المجلد
كود :
Dim fbd As New FolderBrowserDialog()
If fbd.ShowDialog() = Windows.Forms.DialogResult.OK Then
Dim path As String = fbd.SelectedPath
TextBox1.Text = path
Dim dir As New IO.DirectoryInfo(path)
TextBox2.Text = dir.Name
End If
شكرا اخي الكريم جازاك الله خيرا
كله تمام
(24-09-19, 04:28 PM)EMAD268716 كتب :اخي الكريم اتحملني هل استطيع اختيار مجلد موجود ضمن مجلد اخر وشكرا لك سلفا(24-09-19, 01:52 AM)ابراهيم ايبو كتب : السلام عليكم اخي الكريم
لتحديد مجلد وجلب اسمه سنحتاج الى اداة FolderBrowserDialog
انشئ مشروع جديد وضع 2 تكست بوكس و1 بوتون وضع هذا الكود في البوتن
التكست بوكس 1 يجلب المسار مع اسم المجلد والتكست بوكس 2 يجلب اسم المجلد
كود :
Dim fbd As New FolderBrowserDialog()
If fbd.ShowDialog() = Windows.Forms.DialogResult.OK Then
Dim path As String = fbd.SelectedPath
TextBox1.Text = path
Dim dir As New IO.DirectoryInfo(path)
TextBox2.Text = dir.Name
End If
شكرا اخي الكريم جازاك الله خيرا
كله تمام
