منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[VB.NET] جمع عمود داتا كريت فيو مع تجاهل الخلايا الفارغة - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [VB.NET] جمع عمود داتا كريت فيو مع تجاهل الخلايا الفارغة (/showthread.php?tid=52936)

جمع عمود داتا كريت فيو مع تجاهل الخلايا الفارغة - EMADW - 29-04-25

كود :
Textbox1.tex=formatnumbef(val(textbox1.text),0)
استخدم هذا الكود لجمع عامود في داتا كريت فيو  ولكن عندما يكون احد الحقول فارغا  لايجمع قيمة العامود 
كيف بقدر اتجاهل الخلايا الفارغة وجمع الخلايا الاخرى

RE: جمع عمود داتا كريت فيو مع تجاهل الخلايا الفارغة - أبو خالد الشكري - 29-04-25

هذا الكود ليس له علاقة أبدا بـ DataGridView

RE: جمع عمود داتا كريت فيو مع تجاهل الخلايا الفارغة - مصمم هاوي - 29-04-25

جرب الكود التالي:
كود :
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" باســـم التكست بوكس الذي تريد وضع الناتج فيــه

RE: جمع عمود داتا كريت فيو مع تجاهل الخلايا الفارغة - Kamil - 29-04-25

مثال على كود 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(cellValue) Then
            total += Convert.ToDouble(cellValue)
        End If
    End If
Next

TextBox1.Text = FormatNumber(total, 0) 

غيّر "اسم_العمود" إلى اسم العمود الذي تريد جمعه (يمكن أن يكون رقمًا مثل 0 لو استخدمت رقم الفهرس).
الدالة IsNumeric تتحقق من أن القيمة قابلة للتحويل إلى رقم وتتجاهل الفارغة أو النصوص.

RE: جمع عمود داتا كريت فيو مع تجاهل الخلايا الفارغة - Taha Okla - 29-04-25

(29-04-25, 05:23 PM)EMADW كتب :
كود :
Textbox1.tex=formatnumbef(val(textbox1.text),0)
استخدم هذا الكود لجمع عامود في داتا كريت فيو  ولكن عندما يكون احد الحقول فارغا  لايجمع قيمة العامود 
كيف بقدر اتجاهل الخلايا الفارغة وجمع الخلايا الاخرى

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