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

نسخة كاملة : سؤال سريع : كيف يمكن اضافة كمية ( +1 ) الى صنف موجود مسبقا في فاتورة
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
في فاتورة بيع , عند اضافة صنف جديد باستخدام الباركود او مربع نص 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 
' كود الاضافة

كيف احل المشكلة الموضوحة بالصورة :
ما هو رقم العامود الموجود به باركود المنتج
(30-04-20, 01:45 AM)aljzazy كتب : [ -> ]ما هو رقم العامود الموجود به باركود المنتج

cell(1)           رقم
وكذلك رقم العامود الموجود فيه الكمية

كود :
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: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  صف اما الباقي لا 
زي ما بالصورة
اذا عندك برنامج anydesk ممكن اشوف الاكواد كاملة
عندي team viewer
بزبط؟
لا اخي ما بستخدمه
(30-04-20, 02:12 AM)aljzazy كتب : [ -> ]لا اخي ما بستخدمه

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

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

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

هي نزلته

شو اساوي هسا ؟؟
ارسلي الرقم خاص

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