+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [VB.NET] التعديل على المثال (/showthread.php?tid=39461)
التعديل على المثال - AHMED213 - 07-09-21
[attachment=26980][attachment=26980]السلام عليكم و رحمة الله تعالى و بركاته
ارجو من الاخوة الكرام التعديل على المثال المرفق لتفادي التكرار في فتورة البيع
بمعنى انه عند عملية البيع في الفاتورة لا اريد ان تتكرر معي نفس المادة كذا مرة اريد ان يكون التغيير فقط في الكمية
وشكرا مسبقا ارجو ان تكون صدقة جارية و في ميزان حسناتكم ان شاء الله و السلام عليكم و رحمة الله تعالى و بركاته
RE: التعديل على المثال - ابراهيم ايبو - 08-09-21
السلام عليكم ورحمة الله وبركاته
اخي الكريم
لم اشأ بالخوض في طريقة برمجتك للفورم بشكل عام
جربت المثال ووجدت انك بمجرد كتابة كود المنتج يتم اضافته
هنا اثناء الاضافة يتم عمل حلقة فور يتم التحقق فيها من سجلات الداتاغرايد فإن وجد سجل يحمل كود المنتج وهو في العمود ذو الاندكس صفر يتم اضافة +1 الى الكمية وهي موجودة في العمود ذو الاندكس 3
وان لم يكن موجودا يتم اضافة المنتج بكمية 1
كود :
For i As Integer = 0 To GVMaterials.Rows.Count - 1
If GVMaterials.Rows(i).Cells(0).Value = TxTBarCode.Text.Trim Then
GVMaterials.Rows(i).Cells(3).Value += 1 ' اضافة مقدار واحد الى الكمية
Else
' اضافة المنتج الى الداتاغرايد لان المنتج غير مدخل سابقا
End If
Next