مشکل بعد از استفاده از کلید فوری Escape

[h.moshfeghi]

اساتید ببخشید در یک برنامه
در بخشی از کامند از کلید فوری Escape یک روال فراخوانی می شود بعد از آن در کامندهای بعدی که یک Report را باز می کند دکمه کامند بی تاثیر بوده و گزارش باز نمی شود
باید چکار کرد?????


کد فرمان بصورت زیر بوده است


If KeyAscii = vbKeyEscape Then
If InputBox("ÑãÒ æÑæÏ ÑÇ æÇÑÏ ˜äíÏ ", "ãäæí ÇÍÑÇÒ åæíÊ") = RAMS Then
Me.AllowEdits = True
end if