تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
كيف اضيف عدد 2 Function مع بعض
#1
السلام عليكم  لدي 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
الرد }}}
تم الشكر بواسطة:


الردود في هذا الموضوع
كيف اضيف عدد 2 Function مع بعض - بواسطة mohamedgadain61 - 14-05-24, 06:41 PM

المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  كيف اضيف Where لجملة استعلام *SELECT بها جدولين moh61 13 1,245 25-06-24, 05:22 PM
آخر رد: moh61
  [VB.NET] مطلوب تصحيح سطر فى هذا الــ Function AhmedEissa 3 806 13-12-23, 12:55 AM
آخر رد: العتيق
  ارجاع قيمة Function سعد منصور 1 524 01-11-23, 02:10 AM
آخر رد: Taha Okla
  Sub vs void function سؤال aymen_libya 2 1,052 03-10-22, 10:12 PM
آخر رد: عبدالله الدوسري
Lightbulb Math function to round up the values to .0 or .5 YAMEN.LY 3 834 18-09-22, 06:43 PM
آخر رد: YAMEN.LY
  كبف اضيف تفاصيل الوزن والسعر بداتا جيرد فيو من الباركود mohamedgadain61 1 959 19-06-22, 03:42 AM
آخر رد: Taha Okla
  [VB.NET] كيف يمكن استخدام function الموجوده بالاكسيل داخل الفيجوال بيسك دوت نت popritch 1 1,330 12-02-21, 02:02 AM
آخر رد: أبو عبدالله الحلواني
  عاوز اعمل رساله لمستخدمي البرنامج بتاعي عبر الانترنت كيف اضيف حاجه شكل دي ف البرنامج Hosam Ashraf Elwakel 1 1,750 10-02-21, 01:09 AM
آخر رد: أبو عبدالله الحلواني
  [سؤال] ازاي اضيف البوم صور داخل قاعدة بيانات الاكسس حسن الجلب 1 1,636 05-12-20, 01:39 AM
آخر رد: سعود
  كيف اضيف Adobe pdf reader الى الفيجوال بيسك 2008 aftfm 1 2,133 06-10-20, 12:41 AM
آخر رد: abdou

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم