نفس مشروعك امسح كل الاكواد اللي فيه والصق الكود اللي هنا :
الكود :
كود :
Public Class Form1
Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBox1.SelectedIndexChanged
TextBox1.Text = ComboBox1.Text
End Sub
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Dim folders() As String = IO.Directory.GetDirectories("C:\")
For Each folder As String In folders
ComboBox1.Items.Add(folder)
Next
End Sub
End Class
27-10-16, 09:11 PM (آخر تعديل لهذه المشاركة : 27-10-16, 09:15 PM {2} بواسطة adel27.)
حاولت تتطوير المشروع لكن ما وجدت طريقه
جربت كل دوال الفولدر بدون فائده يمكن كتابتي للكود كانت خطأ
كتبت هذا الكود
كود :
For Each x As String In system.Io.Directory.GetFileSeystemEntries
.Add(x)ComboBox1.item
طبعاً عندي Txt1 هذا التكست يظهر فيه مسـار لكل ملف
أنا اللي محتاجه مع حدث الكليلك يحسب لي كم عدد الملفات الموجوده في المسـار الموجود في txt1 فقط
هذا الكود يظهر المسارات في المسار اللي حددته في كمبوبكس وأنا أقرأها من كمبوبكس وجدت الطريقه طويله
وبعض الأحيان يعطيني خطأ يعترض على الصياغه ..!!؟
أ