دلیل هنگ کردن و بک آب فعال شدن اکسس

[limouchi]

نرم افزار اکسس رو در طول مدتی که سر پروژه ها کارکردم طراحی کردم ولی متاسفانه خطاهای داره
قبلا با زدن روی یک دکمه ریپورت فعال میشد الان دوبار میزنم هنگ میکنه
Private Sub Tmashinalat_Click()
DoCmd.SetWarnings False
DoCmd.Close acReport, "MashinAlat"
DoCmd.OpenReport "MashinAlat", acViewPreview
Requery
DoCmd.SetWarnings True
End Sub
این دستور آیا اشکالی داره؟