[new_programer]

(26-06-20, 06:34 PM)قناص المدينة كتب : For i = 0 To dvg_purchas.Rows.Count - 1
           If dvg_purchas.Rows(i).Cells(0).Value.ToString = txt_code.Text Then
               dvg_purchas.Rows(i).Cells(1).Value += 1
               'هنا ضع جملة الاضافة لقاعدة البيانات
               txt_code.ResetText()
               Return

           Else
               'هنا ضع جملة الاضافة لقاعدة البيانات
               txt_code.ResetText()
               Return
           End If



       Next

لا اريد اراضافة إلى قاعدة البيانات

اريد إضافة إلى الداتا جريد مع إبقاء البيانات الموجودة