منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب - التعامل مع سطر موجود بالداتا جرد فيو

بسم الله الرحمن الرحيم

بالبداية اود ان شكر جميع الاخوان القائمين والمشاركين بهذا المنتدى الرائع
الذي يقدم كل شيء من مساعدات لوجه الله تعالى

سؤالي

عندي فورم يوجد به داتا جرد فيو اقوم بتعبئتها عن طريق تكست بوكس اقوم بادخال باركود المنتج وادخل الكمية في تكست بوكس اخر
وعند الضغط على زر انتر يقوم باضافة سطر بالداتا جرد فيو علما" بان اعمدة الداتا جرد فيو تحتوي على 6 اعمدة ترتيبها كالتالي :

1. رقم المنتج
2. باركود المنتج
3. اسم المنتج
4. سعر المنتج
5. كمية المنتج
6. السعر الاجمالي

طريقة الاضافة تعمل معي بشكل صحيح 100%

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

كل الشكر للجميع مسبقا"

الحمد لله تم حل المشكلة بواسطة استخدام جملة While

الكود ليستفيد منه الجميع

PHP كود :

 Dim i As Integer = 0
        While i < dataGridView1.Rows.Count
          If dataGridView1.Rows(i).Cells(0).Value.ToString() = TXT_IDPRODUCT.Text.ToString() Then
            MessageBox.Show("هذا المنتج تم ادخالة مسبقاً", "تنبية", MessageBoxButtons.OK, MessageBoxIcon.Exclamation)
            Return
          End If
          System.Math.Max(System.Threading.Interlocked.Increment(i),i - 1)
        End While 

هذا أيضا ينفع يضيف 1 الى الكمية :

كود :

For I = 0 To DataGridView1.Rows.Count - 1

            If DataGridView1.Rows(I).Cells(0).Value = TXT_IDPRODUCT.Text Then

                If MsgBox("هذه السلعة موجودة مسبقا هل تريد زيادة كميتها بمقدار 1", MsgBoxStyle.Question +

                          MsgBoxStyle.YesNo, "") = MsgBoxResult.Yes Then

                    DataGridView1.Rows(I).Cells(4).Value += 1

                    MsgBox("تمت إضافة السلعة", MsgBoxStyle.Information, "")

                    Exit Sub

                End If

            End If

        Next

منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

هاني المومني

asemshahen5