اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

اغلاق النموذج بواسطة مفتاحESC


iibat

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

حاليا استخدم هذا الكود في اغلاق النموذج بواسطة مفتاح 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