منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
سؤال سريع : كيف يمكن اضافة كمية ( +1 ) الى صنف موجود مسبقا في فاتورة - نسخة قابلة للطباعة

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



سؤال سريع : كيف يمكن اضافة كمية ( +1 ) الى صنف موجود مسبقا في فاتورة - AwsEsam - 30-04-20

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

الكود المستخدم : 
For i as integer = 0 To guna2datagridview1.rowcount -2 
if txtbarcode.text = guna2datadridview1.rows(i).cells(3).value then
guna2datagridview1.rows(i).cells(3).value = guna2datagridview1.rows(i).cells(3).value + 1

else 
' كود الاضافة

كيف احل المشكلة الموضوحة بالصورة :



RE: سؤال سريع : كيف يمكن اضافة كمية ( +1 ) الى صنف موجود مسبقا في فاتورة - aljzazy - 30-04-20

ما هو رقم العامود الموجود به باركود المنتج


RE: سؤال سريع : كيف يمكن اضافة كمية ( +1 ) الى صنف موجود مسبقا في فاتورة - AwsEsam - 30-04-20

(30-04-20, 01:45 AM)aljzazy كتب : ما هو رقم العامود الموجود به باركود المنتج

cell(1)           رقم


RE: سؤال سريع : كيف يمكن اضافة كمية ( +1 ) الى صنف موجود مسبقا في فاتورة - aljzazy - 30-04-20

وكذلك رقم العامود الموجود فيه الكمية

كود :
For i As Integer = 0 To guna2datadridview1.Rows.Count - 1
           If guna2datadridview1.Rows(i).Cells(1).Value = txtbarcode.Text Then
               MsgBox(" المنتج المراد ادخاله تم اضافته للفاتورة مسبقا")
               guna2datadridview1.Rows(i).Cells(3).Value = guna2datadridview1.Rows(i).Cells(3).Value +1
           End If
       Next



RE: سؤال سريع : كيف يمكن اضافة كمية ( +1 ) الى صنف موجود مسبقا في فاتورة - AwsEsam - 30-04-20

(30-04-20, 01:50 AM)aljzazy كتب : وكذلك رقم العامود الموجود فيه الكمية

cell(1) barcode
cell(2) itemname
cell(3) qty
cell(4) Price
cell(0) itemid

(30-04-20, 01:50 AM)aljzazy كتب : وكذلك رقم العامود الموجود فيه الكمية

كود :
For i As Integer = 0 To guna2datadridview1.Rows.Count - 1
           If guna2datadridview1.Rows(i).Cells(1).Value = txtbarcode.Text Then
               MsgBox(" المنتج المراد ادخاله تم اضافته للفاتورة مسبقا")
               guna2datadridview1.Rows(i).Cells(3).Value = guna2datadridview1.Rows(i).Cells(3).Value +1
           End If
       Next

هسا بحاول 
ان شاء يزبط

(30-04-20, 01:52 AM)AwsEsam كتب :
(30-04-20, 01:50 AM)aljzazy كتب : وكذلك رقم العامود الموجود فيه الكمية

cell(1) barcode
cell(2) itemname
cell(3) qty
cell(4) Price
cell(0) itemid

(30-04-20, 01:50 AM)aljzazy كتب : وكذلك رقم العامود الموجود فيه الكمية

كود :
For i As Integer = 0 To guna2datadridview1.Rows.Count - 1
           If guna2datadridview1.Rows(i).Cells(1).Value = txtbarcode.Text Then
               MsgBox(" المنتج المراد ادخاله تم اضافته للفاتورة مسبقا")
               guna2datadridview1.Rows(i).Cells(3).Value = guna2datadridview1.Rows(i).Cells(3).Value +1
           End If
       Next

هسا بحاول 
ان شاء يزبط
ما زبط 
بس بزبط على اول row  صف اما الباقي لا 
زي ما بالصورة

(30-04-20, 01:52 AM)AwsEsam كتب :
(30-04-20, 01:50 AM)aljzazy كتب : وكذلك رقم العامود الموجود فيه الكمية

cell(1) barcode
cell(2) itemname
cell(3) qty
cell(4) Price
cell(0) itemid

(30-04-20, 01:50 AM)aljzazy كتب : وكذلك رقم العامود الموجود فيه الكمية

كود :
For i As Integer = 0 To guna2datadridview1.Rows.Count - 1
           If guna2datadridview1.Rows(i).Cells(1).Value = txtbarcode.Text Then
               MsgBox(" المنتج المراد ادخاله تم اضافته للفاتورة مسبقا")
               guna2datadridview1.Rows(i).Cells(3).Value = guna2datadridview1.Rows(i).Cells(3).Value +1
           End If
       Next

هسا بحاول 
ان شاء يزبط

(30-04-20, 01:52 AM)AwsEsam كتب :
(30-04-20, 01:50 AM)aljzazy كتب : وكذلك رقم العامود الموجود فيه الكمية

cell(1) barcode
cell(2) itemname
cell(3) qty
cell(4) Price
cell(0) itemid

(30-04-20, 01:50 AM)aljzazy كتب : وكذلك رقم العامود الموجود فيه الكمية

كود :
For i As Integer = 0 To guna2datadridview1.Rows.Count - 1
           If guna2datadridview1.Rows(i).Cells(1).Value = txtbarcode.Text Then
               MsgBox(" المنتج المراد ادخاله تم اضافته للفاتورة مسبقا")
               guna2datadridview1.Rows(i).Cells(3).Value = guna2datadridview1.Rows(i).Cells(3).Value +1
           End If
       Next

هسا بحاول 
ان شاء يزبط
ما زبط 
بس بزبط على اول row  صف اما الباقي لا 
زي ما بالصورة



RE: سؤال سريع : كيف يمكن اضافة كمية ( +1 ) الى صنف موجود مسبقا في فاتورة - aljzazy - 30-04-20

اذا عندك برنامج anydesk ممكن اشوف الاكواد كاملة


RE: سؤال سريع : كيف يمكن اضافة كمية ( +1 ) الى صنف موجود مسبقا في فاتورة - AwsEsam - 30-04-20

عندي team viewer
بزبط؟


RE: سؤال سريع : كيف يمكن اضافة كمية ( +1 ) الى صنف موجود مسبقا في فاتورة - aljzazy - 30-04-20

لا اخي ما بستخدمه


RE: سؤال سريع : كيف يمكن اضافة كمية ( +1 ) الى صنف موجود مسبقا في فاتورة - AwsEsam - 30-04-20

(30-04-20, 02:12 AM)aljzazy كتب : لا اخي ما بستخدمه

طيب دقيقة ببقى نازل

(30-04-20, 02:14 AM)AwsEsam كتب :
(30-04-20, 02:12 AM)aljzazy كتب : لا اخي ما بستخدمه

طيب دقيقة ببقى نازل

هي نزلته

شو اساوي هسا ؟؟


RE: سؤال سريع : كيف يمكن اضافة كمية ( +1 ) الى صنف موجود مسبقا في فاتورة - aljzazy - 30-04-20

ارسلي الرقم خاص

امنيات التوفيق ما شاء الله عليك استمر وسيكون باذن الله لك مستقبل برمجي مذهل