اذهب الي المحتوي
أوفيسنا

الردود الموصى بها

قام بنشر

حاليا استخدم هذا الكود في اغلاق النموذج بواسطة مفتاح Esc

Select Case KeyCode

Case Is = 27 'هذا رقم f6

Shift = 1

DoCmd.Close

End Select

End Sub

عن طريق إضافته : عند مفتاح للأسفل.

عيب هذا الكود انه لابد من تكراره في كل النماذج التي تود أغلاقه  بواسطة مفتاحESC  .

السؤال :

هل يوجد كود بديل يقوم بنفس المهمة كان يكون عن طرق الوحدة النمطية  مربوط بمفتاح ESC من دون ان يتم تكراره في كل نموذج .

شاكر ومقدر للجميع

قام بنشر
2 ساعات مضت, iibat said:

حاليا استخدم هذا الكود في اغلاق النموذج بواسطة مفتاح Esc

Select Case KeyCode

Case Is = 27 'هذا رقم f6

Shift = 1

DoCmd.Close

End Select

End Sub

عن طريق إضافته : عند مفتاح للأسفل.

عيب هذا الكود انه لابد من تكراره في كل النماذج التي تود أغلاقه  بواسطة مفتاحESC  .

السؤال :

هل يوجد كود بديل يقوم بنفس المهمة كان يكون عن طرق الوحدة النمطية  مربوط بمفتاح ESC من دون ان يتم تكراره في كل نموذج .

شاكر ومقدر للجميع

انظر لهدا لعلا تستفيد منه

وحدهنمطيهلاغلاقالنماذج

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information