اريد ان اتخلص من رسالة خطأ من فيجوال بيسك

السلام عليكم

عند نموذج يوجد عليه زر طباعة وبه كود هو

Dim stDocName As String

Dim stLinkCriteria As String

stDocName = "بيانات العمال"

' ضع بالاسفل الرابط بين الجدولين وهو هنا (ID)

stLinkCriteria = "بسم الله الرحمن الرحيم=" & Me!بسم الله الرحمن الرحيم

DoCmd.OpenReport stDocName, , , stLinkCriteria

وعندما اضغط على الامر يطبع لي التقرير المطلوب ويعمل جيدا ولكن

اذا الغيت امر الطباعة من الغاء الامر الخاص بالطباعة تظهر لي رسالة

خطأ في الكود تجدون رابط الصورة بالاسفل ويعلم باللون الاصفر على

هذا السطر

DoCmd.OpenReport stDocName, , , stLinkCriteria

اريد فقط ان الغي هذه الرساله وعدم ظهورها

وهذا رابط الصورة

http://alfahad99.jeeran.com/masseg.bmp

ملاحظة / شريط ادوات التنسيق لا تعمل جميع اوامره الا نوع الخط و حجمه ولونه اقصد

شريط ادوات لتنسيق الكود والصور في المنتدى . لماذا