[abdulla2]

اخواني الموضوع اصبح كبير جدا ..
مع ان الأخ ..  WaeLx   قد اجاب على السوال بسطرين ..
ولكن حبيت ان استفيد منكم بإجابات أخرى فلاحظت ان الكثيرين عدلوا في البرنامج وزادت الاكواد ..

هذا هو الكود الذي ارسله الاخ WaeLx في بداية سؤالي ..
وهو يعمل جيدا ..

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

-------
اخواني يبدو انكم التبس عليك الامر ..
ال id ليس له دخل لانه متسلسل

المطلوب  Shara ..
وهو شارة العامل في العمل  ..

فهناك id متسلسل  . وشارة للعامل  اضافة للإسم ..

فقط لور كزت على جواب  الاخ WaeLx    في اول المشاركة
فقط عدل في الشرط  والامور سارت على احسن مايرام ..

----
ولكن الإجابات بعده ذهب الى اكواد وتعديل في المشروع ..
وبالنهاية انا اشكركم جدا فانا استفيد من اطروحاتكم ..
----
ارجو ان تركزو على اجابات الاخ بسطرين حل الإجابة
لكن انا حبيت استفيد من اجابات اخرى منكم ..


شكرا لكم ..