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

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : زيادة الكمية (/showthread.php?tid=24549)

الصفحات: 1 2


زيادة الكمية - ahmad omar - 15-04-18

عندي TEXTBOX  للكمية وعندي داتا جريد فيو وضفت صنف و كمية 1 وبدي ضيف كمان 1 كيف بدي يزيد الكمية بدل 1 ل 2 

وكمان شغله ازا ضفت نفس اسم الصنف ما يضيف سطر جديد بل تزيد الكمية للصنف الموجود Heart


RE: زيادة الكمية - sendbad100 - 15-04-18

اعمل بحث في الداتا جريد

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


RE: زيادة الكمية - ملهمـ - 16-04-18

قبل كود الاضافة للداتا جريد فيو 
تعمل تشيك 
على سبيل المثال التحقق عن طريق رقم الصنف أو أي شي تختاره أنت
كود :
For i = 0 To DataGridView1.Rows.Count - 1
     ' مقارنة تطابق كود الصنف     If DataGridView1.Rows(i).Cells(0).Value = textID.text then
           ' هنا حقل الكمية   DataGridView1.Rows.Count - 1).Cells(7).Value += 1
                             'Exit Sub
           End If
       Next



RE: زيادة الكمية - ahmad omar - 16-04-18

(16-04-18, 03:54 AM)ملهمـ كتب : قبل كود الاضافة للداتا جريد فيو 
تعمل تشيك 
على سبيل المثال التحقق عن طريق رقم الصنف أو أي شي تختاره أنت
كود :
For i = 0 To DataGridView1.Rows.Count - 1
     ' مقارنة تطابق كود الصنف     If DataGridView1.Rows(i).Cells(0).Value = textID.text then
           ' هنا حقل الكمية   DataGridView1.Rows.Count - 1).Cells(7).Value += 1
                             'Exit Sub
           End If
       Next

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


RE: زيادة الكمية - sendbad100 - 16-04-18

السلام عليكم 
ما  شرحته لك    في مشاركتي الاولى 

واكده اخي ملهم    بالكود  هو ما تبحث عنه

ركز قليلاً  فقط    كي تفهم  الفكرة وستجد الكود بسهولة


RE: زيادة الكمية - السيد الجوهري - 16-04-18

(16-04-18, 01:37 PM)ahmad omar كتب :
(16-04-18, 03:54 AM)ملهمـ كتب : قبل كود الاضافة للداتا جريد فيو 
تعمل تشيك 
على سبيل المثال التحقق عن طريق رقم الصنف أو أي شي تختاره أنت
كود :
For i = 0 To DataGridView1.Rows.Count - 1
     ' مقارنة تطابق كود الصنف     If DataGridView1.Rows(i).Cells(0).Value = textID.text then
           ' هنا حقل الكمية   DataGridView1.Rows.Count - 1).Cells(7).Value += 1
                             'Exit Sub
           End If
       Next

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

تقصد  لما يضرب نفس الصنف بالباركود يزيد الكمية فقط دون اضافة سطر جديد


RE: زيادة الكمية - ahmad omar - 16-04-18

(16-04-18, 01:57 PM)السيد الجوهري كتب :
(16-04-18, 01:37 PM)ahmad omar كتب :
(16-04-18, 03:54 AM)ملهمـ كتب : قبل كود الاضافة للداتا جريد فيو 
تعمل تشيك 
على سبيل المثال التحقق عن طريق رقم الصنف أو أي شي تختاره أنت
كود :
For i = 0 To DataGridView1.Rows.Count - 1
     ' مقارنة تطابق كود الصنف     If DataGridView1.Rows(i).Cells(0).Value = textID.text then
           ' هنا حقل الكمية   DataGridView1.Rows.Count - 1).Cells(7).Value += 1
                             'Exit Sub
           End If
       Next

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

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


RE: زيادة الكمية - حريف برمجة - 16-04-18

ارفق مثال بسيط للتعديل عليه .


RE: زيادة الكمية - ahmad omar - 16-04-18

(16-04-18, 03:54 AM)ملهمـ كتب : قبل كود الاضافة للداتا جريد فيو 
تعمل تشيك 
على سبيل المثال التحقق عن طريق رقم الصنف أو أي شي تختاره أنت
كود :
For i = 0 To DataGridView1.Rows.Count - 1
     ' مقارنة تطابق كود الصنف     If DataGridView1.Rows(i).Cells(0).Value = textID.text then
           ' هنا حقل الكمية   DataGridView1.Rows.Count - 1).Cells(7).Value += 1
                             'Exit Sub
           End If
       Next

يوجد مشكلة في الكود هاد  يعطييني تحتيه خط ازرق 
DataGridView1.Rows.Count - 1).Cells(2).Value += 1


RE: زيادة الكمية - ملهمـ - 17-04-18

أرفق ملف من عندك وحنعدلك عليه ان شاء الله