تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
تجميع البيانات في الداتا قريد
#1
السلام عليكم
عندي داتاقريدفيو يوجد بها بيانات
ليست مرتبطة بقاعدة بيانات
مثلا يوجد بيها عمود يحتوي على البيانات التالية
محمد
علي
محمد
سالم
علي
محمد
اريد تجميع الحقول المتشابهة وتجميع القيم المقابلة لها
الرد
تم الشكر بواسطة:
#2
(31-12-18, 05:46 PM)المتألق9 كتب : السلام عليكم
عندي داتاقريدفيو يوجد بها بيانات
ليست مرتبطة بقاعدة بيانات
مثلا يوجد بيها عمود يحتوي على البيانات التالية
محمد
علي
محمد
سالم
علي
محمد
اريد تجميع الحقول المتشابهة وتجميع القيم المقابلة لها


وعليكم السلام ورحمة الله

تفضل الكود
PHP كود :
Dim d As New Dictionary(Of StringDouble' إنشاء ديكشنري من نص وقيمة

For Each r In DataGridView1.Rows ' 
لوب للمرور على جميع اسطر الداتاجريد
    If r
.IsNewRow Then Exit For 'الخروج من اللوب عند السطر الجديد
    Dim c1 = r.Cells(1).Value ' 
الاسم
    Dim c2 
Val(r.Cells(2).Value' القيمة
    If d.ContainsKey(c1) Then ' 
التأكد من وجود الاسم في الديكشنري
        d
(c1) = d(c1) + c2 ' أضف القيمة للاسم الى القيم السابقة له
    Else
        d.Add(c1, c2) ' 
أضف الاسم الجديد مع أول قيمة له
    End 
If
Next

DataGridView1
.DataSource d.ToList ' تحويل الديكشنري الى قائمة لعرضها في الداتاجريد 
الرد
تم الشكر بواسطة: عبد العزيز البسكري
#3
مشكور ساجربها
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  لمذا ظهور هذا الخطأ فى الداتا جريد فيو خالد كامل1 0 17 منذ 7 ساعة مضت
آخر رد: خالد كامل1
  سؤال حول عرض البيانات في تكست بوكس من قاعدة البيانات ahmadpal 0 10 منذ 7 ساعة مضت
آخر رد: ahmadpal
Wink [سؤال] سؤال حول عرض البيانات في كومبوبوكس ahmadpal 2 63 23-03-19, 11:42 PM
آخر رد: ahmadpal
  سؤال فى قواعد البيانات احمد خطاب 3 60 23-03-19, 02:28 PM
آخر رد: Emam emam
  [VB.NET] اظهار صفوف معينة من الداتا سيت محمد اسماعيل 6 77 20-03-19, 11:54 PM
آخر رد: محمد اسماعيل
  عرض البيانات بشكل عمودي في DataGridView ابراهيم ايبو 2 105 19-03-19, 02:29 PM
آخر رد: 5000
  عرض بيانات في الداتا جريد فيو Emam emam 7 236 16-03-19, 05:46 PM
آخر رد: 5000
  عرض البيانات فى الداتا جريد فيو بكمة محددة مثل من 1الى 10 ثم استدعاء مايالية10الى 20 sherf 1 89 16-03-19, 05:17 PM
آخر رد: 5000
  قاعدة البيانات سكوال سرفر محمد خيري 3 162 16-03-19, 04:22 AM
آخر رد: asemshahen5
  [VB.NET] جلب بينات من الداتا جريد فيور الى فورم 2 تاكست بوكس anis 16 495 15-03-19, 09:41 PM
آخر رد: anis

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


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