تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[مشروع] استكمال لهذا المشروع
#1
تصحيح الكود فى المشروع المرفق بحيث عند اختيار فولد من القائمة المنسدلة فى ال combobox الاول يسرد لى ما بداخل هذا الفلدر من فولدرات فرعية فى ال combobox الثانى


الملفات المرفقة
.rar   browser1.rar (الحجم : 204.04 ك ب / التحميلات : 12)
الرد }}}}
تم الشكر بواسطة:
#2
المشكلة تحدث في CombpBox1 حيث يحتوى اسماء الملفات بدون المسار
جرب الان
PHP كود :
Private Sub TextBox1_MouseClick(ByVal sender As ObjectByVal e As System.Windows.Forms.MouseEventArgsHandles TextBox1.MouseClick
        
If (FolderBrowserDialog1.ShowDialog() = DialogResult.OKThen
            TextBox1
.Text FolderBrowserDialog1.SelectedPath
        End 
If
    
End Sub
    
Private Sub TextBox1_TextChanged(ByVal sender As System.ObjectByVal e As System.EventArgsHandles TextBox1.TextChanged
        ComboBox1
.Items.AddRange(IO.Directory.GetDirectories(TextBox1.Text).ToArray)

    
End Sub


    
Private Sub ComboBox1_SelectedValueChanged(ByVal sender As System.ObjectByVal e As System.EventArgsHandles ComboBox1.SelectedValueChanged
        ComboBox2
.Items.AddRange(IO.Directory.GetFiles(ComboBox1.Text).ToArray)

    
End Sub 
الرد }}}}
تم الشكر بواسطة:
#3
شكرا لاهتمامك بس انا عايز اسماء الفلدرات فقط الى تظهر من غير المسار الكامل
الرد }}}}
تم الشكر بواسطة:
#4
الفلدرات ولا الملفات؟ وفي أي ComboBox الأول او الثاني؟
الرد }}}}
تم الشكر بواسطة:
#5
الملفات والفلدرات وفى ال comcobox الاول والثانى
الرد }}}}
تم الشكر بواسطة:
#6
هذا التعديل
PHP كود :
Public Class Form1

    Dim files 
As String()

    Private 
Sub TextBox1_MouseClick(ByVal sender As ObjectByVal e As System.Windows.Forms.MouseEventArgsHandles TextBox1.MouseClick
        
If (FolderBrowserDialog1.ShowDialog() = DialogResult.OKThen
            TextBox1
.Text FolderBrowserDialog1.SelectedPath
            files 
IO.Directory.GetDirectories(TextBox1.Text)
            
ComboBox1.Items.AddRange(files.Select(Function(nameIO.Path.GetFileName(name)).ToArray)
        
End If
    
End Sub

    
Private Sub ComboBox1_SelectedValueChanged(ByVal sender As System.ObjectByVal e As System.EventArgsHandles ComboBox1.SelectedValueChanged
        ComboBox2
.Items.AddRange(IO.Directory.GetFiles(files(ComboBox1.SelectedIndex)).Select(Function(nameIO.Path.GetFileName(name)).ToArray)

    
End Sub

End 
Class 
الرد }}}}
تم الشكر بواسطة: طالب 22


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [VB.NET] مشكلة في تعديل المشروع مصمم هاوي 9 517 15-09-17, 06:54 PM
آخر رد: مصمم هاوي
  [VB.NET] مشكلة اثناء تنفيذ المشروع ظاهر علي 1 41 15-09-17, 01:28 AM
آخر رد: أبو نوره
  [VB.NET] مشكلة حيرتنى فى شروط if المشروع مرفق الماجيك مسعد 12 372 16-07-17, 06:04 PM
آخر رد: الماجيك مسعد
  [VB.NET] مشكلة في حفظ اعدادات المشروع سعود الشامان 13 620 16-07-17, 12:42 PM
آخر رد: أبوبكر سويدان
  [VB.NET] كيف اعمل السابق /previous في هذا الكود + المشروع e-coder 1 97 10-07-17, 11:04 AM
آخر رد: e-coder
  [سؤال] اضافة مجلدات المشروع لبرنامج ال setup factory makky 3 374 06-07-17, 03:37 PM
آخر رد: Adrees
  حل لهذا الكود ddemed 10 262 01-07-17, 02:11 AM
آخر رد: ddemed
  [VB.NET] مشكلة عدم تنفيذ الكود + المشروع بالكامل e-coder 0 127 07-06-17, 01:57 PM
آخر رد: e-coder
  [VB.NET] تعديل بسيط على المشروع المرفق أبووسم 11 627 05-06-17, 03:24 PM
آخر رد: أبووسم
  مشكلة اختلاف شكل عرض المشروع من جهاز الي جهاز اخر khaled12345 11 446 04-06-17, 01:07 AM
آخر رد: khaled12345

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم