[EMADW]

كود :

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

[Kamil]

مثال على كود 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 تتحقق من أن القيمة قابلة للتحويل إلى رقم وتتجاهل الفارغة أو النصوص.

[Taha Okla]

(29-04-25, 05:23 PM)EMADW كتب :

كود :

Textbox1.tex=formatnumbef(val(textbox1.text),0)

استخدم هذا الكود لجمع عامود في داتا كريت فيو  ولكن عندما يكون احد الحقول فارغا  لايجمع قيمة العامود 
كيف بقدر اتجاهل الخلايا الفارغة وجمع الخلايا الاخرى

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