[mohamedgadain61]

السلام عليكم  لدي DataGridView1 اريد عند تكرار اسم المنتج في عمود رقم (0) وسعر المنتج في عمود رقم (1)

اريد عن تكرار المنتج والسعر فقط يتم زيادة فقط عدد المنتج والسعر دون ادخال المنتج من جديد 



اريد فقط التعديل بالكود حتى يعمل بشكل صحيح وشكرا 



مرفق لكم الكود 






 If isfound(DescriptionT.Text + note) = True And isfound1(BB7.Text) = True Then

                    For i As Integer = DataGridView1.SelectedRows.Count - 1 To 0
                        DataGridView1.Rows(rowindex).Cells(1).Value += Val(Me.ItemN.Value)
                        DataGridView1.Rows(rowindex).Cells(3).Value += Val(Me.ItemN.Value * Me.BB7.Text)
                    Next
                Else
                    Me.DataGridView1.Rows.Add(DescriptionT.Text + note, Me.ItemN.Value, Me.BB7.Text, Me.ItemN.Value * Me.BB7.Text, billnumber)
                End If



 Private Function isfound(txt As String) As Boolean
        For Each row As DataGridViewRow In DataGridView1.Rows
            If row.IsNewRow = False Then
                If row.Cells(0).Value = txt Then
                    rowindex = row.Index
                    Return True
                End If
            End If
        Next
        Return False
    End Function




  Private Function isfound1(txt1 As String) As Boolean
        For Each row As DataGridViewRow In DataGridView1.Rows
            If row.IsNewRow = False Then
                If row.Cells(2).Value = txt1 Then
                    rowindex = row.Index
                    Return True
                End If
            End If
        Next
        Return False

[غزة العزة]

لنقم بتعديل الكود ليقوم بزيادة عدد المنتج والسعر عندما يتم العثور على منتج بنفس الوصف ونفس السعر. يجب تحديد السعر الجديد بناءً على السعر الحالي وعدد المنتجات الجديدة المضافة.

هناك بعض التغييرات التي يجب إجراؤها في الكود. إليك كيف يمكن تعديله:

PHP كود :

If isfound(DescriptionT.Text + note) AndAlso isfound1(BB7.Text) Then
    For Each row As DataGridViewRow In DataGridView1.Rows
        If Not row.IsNewRow AndAlso row.Cells(0).Value = DescriptionT.Text + note AndAlso row.Cells(2).Value = BB7.Text Then
            row.Cells(1).Value = CInt(row.Cells(1).Value) + CInt(ItemN.Value)
            row.Cells(3).Value = CDbl(row.Cells(3).Value) + (CInt(ItemN.Value) * CDbl(BB7.Text))
            Exit Sub ' توقف البحث بمجرد العثور على الصف الذي يحتاج إلى التحديث
        End If
    Next
Else
    DataGridView1.Rows.Add(DescriptionT.Text + note, ItemN.Value, BB7.Text, ItemN.Value * CDbl(BB7.Text), billnumber)
End If 


هذا التعديل يأخذ الصف الذي يحتاج إلى التحديث ويزيد عدد المنتجات والسعر بناءً على المدخلات الجديدة.