21-02-24, 01:40 AM
21-02-24, 07:48 AM
استخدم هذا الكود
PHP كود :
TotalMoney.Text = (From row In GVItems.Rows Select CDbl(row.Cells(13).Value)).Sum().ToString
21-02-24, 11:51 PM
Private Sub SumColumnValuesWithCondition()
Dim columnNameToCheck As String = "اسم العمود" ' اسم العمود الذي ترغب في فحصه
Dim valueToCheckFor As Boolean = True ' القيمة التي ترغب في فحصها في العمود الأخر
Dim columnToSum As String = "العمود الذي ترغب في جمع قيمه" ' اسم العمود الذي ترغب في جمع قيمه
Dim totalSum As Integer = 0
For Each row As DataGridViewRow In DataGridView1.Rows
If row.Cells(columnNameToCheck).Value IsNot Nothing AndAlso row.Cells(columnNameToCheck).Value.ToString() = valueToCheckFor.ToString() Then
Dim cellValue As Integer = 0
If Integer.TryParse(row.Cells(columnToSum).Value.ToString(), cellValue) Then
totalSum += cellValue
End If
End If
Next
MessageBox.Show("مجموع القيم: " & totalSum.ToString())
End Sub
Dim columnNameToCheck As String = "اسم العمود" ' اسم العمود الذي ترغب في فحصه
Dim valueToCheckFor As Boolean = True ' القيمة التي ترغب في فحصها في العمود الأخر
Dim columnToSum As String = "العمود الذي ترغب في جمع قيمه" ' اسم العمود الذي ترغب في جمع قيمه
Dim totalSum As Integer = 0
For Each row As DataGridViewRow In DataGridView1.Rows
If row.Cells(columnNameToCheck).Value IsNot Nothing AndAlso row.Cells(columnNameToCheck).Value.ToString() = valueToCheckFor.ToString() Then
Dim cellValue As Integer = 0
If Integer.TryParse(row.Cells(columnToSum).Value.ToString(), cellValue) Then
totalSum += cellValue
End If
End If
Next
MessageBox.Show("مجموع القيم: " & totalSum.ToString())
End Sub
24-02-24, 04:17 PM
السلام عليكم المراد بالضبط هو أنه يتم جمع تكلفة الصيانة فى مربع خاص بالمهندس إبراهيم حسب حالة الصيانة true دون جمع تكلفة صيانة المهندس احمد ودون جمع التكلفة التى حالة الصيانة الخاصة بها false وجزاكم الله خيراً
25-02-24, 12:32 AM
كود :
Dim sum As Integer = 0
For Each row As DataGridViewRow In DataGridView1.Rows
If row.Cells(3).Value IsNot Nothing AndAlso row.Cells(3).Value.ToString() = "abrahim" AndAlso
row.Cells(2).Value IsNot Nothing AndAlso row.Cells(2).Value.ToString() = "True" Then
' Check if column 1 has a valid integer value and accumulate the sum
Dim value As Integer
If Integer.TryParse(row.Cells(1).Value.ToString(), value) Then
sum += value
End If
End If
Next25-02-24, 11:26 PM
كيفية أخراج الناتج فى التيكست بوكس