[اسلام الكبابى]

لدى قاعدة بيانات بها جدول EMPLOYEE  به حقل salary
ولدى Adodc1 متصل بهذا الجدول و DataGrid1 متصلة بال Adodc1
وكتبت كودآ للزر DELET بحيث يقوم البرنامج بعد الحذف باعادة ترتيب الأرقام المسلسلة للموظفين

فمثلآ اذا كانوا 6 موظفين أرقامهم المسلسلة 1,2,3,4,5,6 وقمت بحذف السجل صاحب الرقم  2
أجد السجلات الخمسة المتبقية  أرقامهم المسلسلة 1,2,3,4,5 (لا أجدها 1,3,4,5,6)
فكان يعمل دون أى مشاكل أثناء وجود جملتى الmsgbox التى وضعتهما مؤقتين لنفسى لمتابعة سير خطوات البرنامج لحين الانتهاء من اجراء تجاربى عليه
MsgBox "/////////////", vbOKOnly, "fffffffffff"
فلما حذفت هتين الجملتين من الكود ظهرت رسالة خطأ عند عمل ال RUN 
أرجو تصحيح الكود أو تصحيح البرنامج المرفق بأى طريقة
بحيث لا يوجد فى الكود أى جملة MSGBOX
وبحيث يتم اعادة ترتيب الأرقام المسلسلة فى ال DataGrid بعد الضغط على الزرDELET

ولكم ألف شكر