منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : جمع عمود داتا كريت فيو مع تجاهل الخلايا الفارغة
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
كود :
Textbox1.tex=formatnumbef(val(textbox1.text),0)
استخدم هذا الكود لجمع عامود في داتا كريت فيو  ولكن عندما يكون احد الحقول فارغا  لايجمع قيمة العامود 
كيف بقدر اتجاهل الخلايا الفارغة وجمع الخلايا الاخرى
هذا الكود ليس له علاقة أبدا بـ DataGridView
جرب الكود التالي:
كود :
Dim sum As Double = 0
For Each row As DataGridViewRow In DataGridView1.Rows
    If Not row.IsNewRow AndAlso Not String.IsNullOrEmpty(row.Cells(رقم العمود المراد جمعه).Value.ToString()) Then
        sum += Convert.ToDouble(row.Cells(رقم العمود المراد جمعه).Value)
    End If
Next
TextBox1.Text = sum.ToString()

مع استبدال "العمـــود" برقمـــ العمود الذي تريد جمعــه
واســم "TextBox1" باســـم التكست بوكس الذي تريد وضع الناتج فيــه
مثال على كود VB.NET لتجميع القيم في عمود معين مع تجاهل القيم الفارغة:

PHP كود :
Dim total As Double 0

For Each row As DataGridViewRow In DataGridView1.Rows
    If Not row
.IsNewRow Then
        Dim cellValue 
As Object row.Cells("اسم_العمود").Value
        If IsNumeric
(cellValueThen
            total 
+= Convert.ToDouble(cellValue)
 
       End If
 
   End If
Next

TextBox1
.Text FormatNumber(total0

غيّر "اسم_العمود" إلى اسم العمود الذي تريد جمعه (يمكن أن يكون رقمًا مثل 0 لو استخدمت رقم الفهرس).
الدالة IsNumeric تتحقق من أن القيمة قابلة للتحويل إلى رقم وتتجاهل الفارغة أو النصوص.
(29-04-25, 05:23 PM)EMADW كتب : [ -> ]
كود :
Textbox1.tex=formatnumbef(val(textbox1.text),0)
استخدم هذا الكود لجمع عامود في داتا كريت فيو  ولكن عندما يكون احد الحقول فارغا  لايجمع قيمة العامود 
كيف بقدر اتجاهل الخلايا الفارغة وجمع الخلايا الاخرى

أكتب كود الدالة : formatnumbef
حتى يتم التصحيح عليها لتصبح تجمع لك حتى في حال الفراغ..