[معاند الحظ]

يا اخي

تقول انك تستخدم الكود التالي للتعديل 

كود :

For I = 0 To dgv.Rows.Count - 1
If txtShara.Text = dgv.Rows(I).Cells(2).Value.ToString Then
MsgBox("رقم الشارة موجود مسبقا", MsgBoxStyle.Information, "خطأ")
txtShara.SelectAll()
txtShara.Focus()
Exit Sub
End If
Next

ولو تلاحظ ان الكود فيه الشرط  التالي
اذا كانت القيمة الموجودة في txtShara.Text هي نفس القيمة الموجودة في dgv.Rows(I).Cells(2).Value.ToString اذن امنع التعديل اضهر رسالة خطأ





فما ادري بصراحة كيف تبغى تعدل البيانات مع الشرط هذا ؟
لان الشرط يمنع التعديل بينما انت تحتاج الى شرط يكون كالتالي

كود :

For I = 0 To dgv.Rows.Count - 1
If txtShara.Text = dgv.Rows(I).Cells(2).Value.ToString Then
' هنا يجب ان تضع كود التحديث او التعديل
updateMydata

txtShara.SelectAll()
txtShara.Focus()
Exit Sub
End If
Next

Sub updateMydata()
'اجراء تعديل البيانات
'ضع كود تعديل او تحديث البيانات هنا



End Sub