نمطيه لمنع الطباع في النماذج

اخي الفاضل باهر

السلام عليكم ورحمة الله وبركاته

اقتباس

ملاحظه اني اسائل ولا اراجواب في اكثر من مشاركه

سامحك الله على هذه الكلمات

فكل مشاركاتك عددها 33 مشاركه وهي مركزه في هذه المواضيع

كيف حذف جميع العلاقات بين الجداول برمجيا بكود

كود متغير لاسم التقرير المفتوح

رسالة خطاء بعد زرا امر طباعة تقرير من النموذج

سوال عن التقارير في الاكسس

تصدير التقارير الى ملفات ورد عن طريق الكود

ترقيم تلقائي بدون مصدر تحكم

تحديث سجلات مختارة مختلف لغياب الموظفين

وقد تم الإجابة عليك فيها كلها عدى مشاركة واحده لم تقم بإرفاق الملف عندما طلب منك المشرف ابو ساره والخبير ايهاب وتأخرت فيه لمدة عشرة ايام وهو الرابط الأخير

عموما اخي الكريم بالنسبة لسؤالك عند عمل وحده نمطية لعدم تمكين مفاتيح معينة عند الضغط عليها فلا أضن ذلك ممكنا لآن الحدث يجب ان يكون في النموذج عند الضغط على مفتاح للأسفل

وهذا مثال على هذه الطريقة انظر الأكواد

Dis_F1_CTRL_P.rar

استاذتي الفاضله زهره بارك فيكي وزادكي العلما وحلما وكثرلك كل الخيرات البركات

استاذتي العزيزه المطلوب ان يكون الكود في وحده نمطيه وليس في النموذج ذاته اى Function يتم استدعها في اي نموذج عملتها بهذا الشكل ولم تنفع معي ارجو لو تكرمتوا بتعديلها حي استطيع الاستفاد منها في برنامج لكي خلص الشكر والتقدير

اما بنسبه فأن لي موضوع عن الاستعلامات قبل هذا لم يرد عليه وعلي العموم افضالكي كثيره عليا وعلى كثر من اعضاء المنتدي وبارك الله فيه وزاد من امثالك واجرك الله عن كل حرف حسنه .

ملاحظه : لعدم الرد على الموضيع التي اطرحه انا بعد الرد عليها لنه لااملك خط انترنت وانما اتصفح من في مقهي خارج البيت وهو بعيد عن الحي الذي اسكن فيه .

اقتباس

Public Function noprent()

Select Case KeyCode

Case 112, 80, 17

KeyCode = 0

End Select

End Function

لــــــرفــــــع

السلام عليكم

الأخت زهرة جزاك الله خيراً ,

لدى تجربة الكود الذي وضعته فإن الكود يمنع المستخدم من إمكانية كتابة حرف p , فهل يوجد طريقة لدمج الكونترول مع P معاً

وشكراً

نعم اخي عمار يمكن عمل ذلك في النموذج عند حدث ضغط المفتاح للإسفل حسب الكود التالي

Private Sub Form_KeyDown(keycode As Integer, shift As Integer)
'معا CTRL+P هذا الكود خاص بإيقاف المفاتيح
If shift = 2 And keycode = 80 Then keycode = 0

' F1 هذا الكود يقوم بلإيقاف مفتاح المساعدة
If keycode = 112 Then keycode = 0

End Sub

وهذا مثال على ذلك

zaDis_F1_CTRL_P.rar

الاخت زهر بارك الله فيكي

لايمكن ان تكون في وحده نمطيه كما طلبة

حتي يتم استدعها من انموذج

الرجوا الرد لاني في حاجه اليها ظروري جدا

ردو عليا هل انه لايكمن ان يكون الكود في وحده نمطيه يتم استدعئها من اي نموذج اولا

للرفع للرفع

لرفع للرفع

أخي الفاضل باهر

لقد اجبنا عليك في بداية المشاركة

اقتباس

عموما اخي الكريم بالنسبة لسؤالك عند عمل وحده نمطية لعدم تمكين مفاتيح معينة عند الضغط عليها فلا أضن ذلك ممكنا لآن الحدث يجب ان يكون في النموذج عند الضغط على مفتاح للأسفل

بمعنى لا بد ان يكون الحدث في النموذج عند ضغط مفتاح للأسفل

أختي الكريمه زهره هو كان المطلوب وحدهنمطيه الان عرفه انه لايمكن علمها

شكر جزيل واسف على كثرة الاسئله

افضل الناس انفعهم للناس

اقصد شكر وليس مشاركة