ارجو من جميع خبراءواعضاء المنتدى المساعدة بعملية جمع قيم من DataGridView1 ولنفرض الكود " 2 " يوجد لديه 3 قيم في الحقل number
50+50+50= 150 المطلوب عند الضغط على الذر احسب يتم جمع الارقام الخاصة بالكود رقم " 2 " من DataGridView1 وعرض االكود و المجموع الكلي للرقم "2" في DataGridView2 تم ارفاق المثال الموجود في البرنامج للتعديل عليه ومشاهدته ارجو منكم المساعدة وجزاكم الله كل خير .
النتيجة المطلوبه للمخرجات كالتالي ويتم عرضها بال DataGridView2 :
02-09-15, 10:03 PM (آخر تعديل لهذه المشاركة : 02-09-15, 10:04 PM {2} بواسطة أبو عمر.)
صحيح يا سعود
مثالك الاقرب لطلبه تقريبا
محمد يجب ان تفرق بين النص string
والعدد integer or double
لاحظت انك مخلي code
number
نصوص
وهذا خطأ بالنسبة بالنسبة في حال الجمع او الطرح او اي عملية رياضية
لذلك غيرت نوع الحقل number الى رقم حتى استطيع ان اعمل تجميع من جملة الاستعلام
Summary & grouping
بالتوفيق مجدداً
سبحان الله والحمدللهولا إله إلا الله والله أكبر
اللهم اغْفِرْ لِلمؤمنين والمؤمنات والمسلمين والمسلمات الأحياء منهم والأموات
03-09-15, 12:31 AM (آخر تعديل لهذه المشاركة : 06-09-15, 08:22 AM {2} بواسطة سعود.)
PHP كود :
Private Function gsum(ByVal h As String) As Integer Dim p As Integer = 0 For a = 0 To d1.Rows.Count - 1 Dim itm As String = d1.Rows(a).Cells(0).Value.ToString If itm = h Then Dim itm2 As String = d1.Rows(a).Cells(1).Value.ToString p += itm2 End If Next Return p End Function Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click Dim lst As New List(Of Integer) lst.Clear() For a = 0 To d1.Rows.Count - 1 Dim itm As String = d1.Rows(a).Cells(0).Value.ToString If lst.Contains(itm) = False Then lst.Add(itm) End If Next d2.Rows.Clear() For Each h In lst d2.Rows.Add(h.ToString.Trim, gsum(h)) Next End Sub