تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
سؤال عن كيفية جمع الارقام الموجبة فقط من عمود في الداتا جريد فيو
#1
السلام عليكم ورحمة الله وبركاته
لدي داتا جريد وفيها عمود الرصيد ويحتوي العمود على العديد من سجلات الاعداد منها سالب والاخر موجب
كيف يمكنني جمع الاعداد الموجبة فقط من هذا العمود

وحياكم الله جميعا
الرد
تم الشكر بواسطة:
#2
وعليكم السلام ورحمة الله وبركاتة


استخدم هذة الطريقة : أفضل
كود :
       Dim CellIndex As Integer = 1 ' الخاص بالخلية, وهو ترتيبها  Index ضع عنا رقم الـ
       Dim Total As Double = DataGridView1.Rows.Cast(Of DataGridViewRow).Sum(
                               Function(r)
                                   If  Not IsDBNull(r.Cells(CellIndex).Value) AndAlso Val(r.Cells(CellIndex).Value) > 0 Then
                                       Return Val(r.Cells(CellIndex).Value)
                                   Else
                                       Return 0
                                   End If
                               End Function)

       MsgBox(Total)
أو بهذة الطريقة :
كود :
       Dim Total As Double = 0
       Dim CellIndex As Integer = 1 ' الخاص بالخلية, وهو ترتيبها  Index ضع عنا رقم الـ
       For Each r As DataGridViewRow In DataGridView1.Rows
           If Not IsDBNull(r.Cells(CellIndex).Value) AndAlso Val(r.Cells(CellIndex).Value) > 0 Then
               Total += Val(r.Cells(CellIndex).Value)
           End If
       Next
       MsgBox(Total)
الرد
تم الشكر بواسطة: عبد العزيز البسكري
#3
جزاك الله خير 
أخي عبدالله 
ماقصرت
الرد


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [VB.NET] حفظ البيانات دفعة واحدة الداتا جريد فيو mahmoud.3com 1 111 16-12-18, 09:07 PM
آخر رد: viv
  سؤال فى قواعد البيانات احمد خطاب 5 119 26-11-18, 03:41 AM
آخر رد: elgokr
  [سؤال] سؤال في vb.net و mysql اللورد محمود 1 165 18-10-18, 01:43 AM
آخر رد: sofizer
  سؤال عن الداتا ريدر sal_56 4 195 17-09-18, 10:23 AM
آخر رد: 911
Heart [VB.NET] سؤال : كود يجمع العناصر المتشابة في داتا قريد عن الاظافة بدون تكرار EYADISMAIL 16 753 11-09-18, 01:22 AM
آخر رد: EYADISMAIL
  سؤال حول عرض البيانات في الداتا جريد والاستعلام alfaiz678 12 663 25-08-18, 10:00 PM
آخر رد: elgokr
  كيفية حفظ التعديل في Data Grid View مباشرا الى قاعدة البيانات اللورد محمود 1 458 02-08-18, 07:26 PM
آخر رد: سعود
  [VB.NET] الداتا غريد فيو Data Grid View QWERTU 3 328 25-07-18, 04:15 PM
آخر رد: elgokr
  [سؤال] كيفية ربط قاعدة بيانات اكسس 2007 بالفيجوال 2008 mohmedhosen 3 5,522 16-07-18, 08:48 PM
آخر رد: aridje34
  كيفية استرجاع جدول محدوف المتألق9 0 165 11-07-18, 08:34 PM
آخر رد: المتألق9

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


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