تعطيل عمل لوحة المفاتيح في النموذج

اخي الكريم

اذهب الى النموذج وافتح خصائص النموذج وعند خصائص

الحدث ....اجعل خاصية ( مفتاح العرض التمهيدي ) نعم

ثم عند خاصية ( عند مفتاح للأسفل ) اختار [إجراء حدث ]

ثم افتحه واكتب فيه الكود التالي بحيث يصبح هكذا:

[l]





Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)

Select Case KeyCode

Case 9, 33, 34

KeyCode = 0

Case 40 And Shift = 2

KeyCode = 0

Case 38 And Shift = 2

KeyCode = 0

Case 70 And Shift = 2

KeyCode = 0

Case Else

End Select

End Sub

 



[/l]

فمن خلال الـ Case يمكنك ان تعطل اي مفتاح من مفاتيح الكيبورد

وبالتوفيق اخي الكريم

جزاك الله خيرا وبارك الله فيك يا أخي أسامه

قمت بنسخ الكود الذي أوردته هنا ولصقته في المكان المحدد حسب ما ذكرت أنت فقام بتعطيل التنقل عن طريق التاب فقط ولكنه لم يعطل التنقل عن طريق الاسهم يمين أو يسار

علماً بأنه لا علم عندي بكيفية تعطيل أي مفتاح من مفاتيح الكيبورد فهل تفيدني في هذا الشيئ وأكون لك شاكرا ومقدرا جهدك

وتقبل خالص تحياتي

الأخ سعودي 31

غير الأرقام 33 ، 34 بالأرقام التالية 37 ، 39 فقط واترك الكود كما هو .

أشرف خليل

شكرا أخوي أشرف خليل

تم تعطيل الاسهم يمين ويسار

ولكن الأسهم إلى الأعلى والى الأسفل لا تزال تعمل فما هو أرقامها وهل أضيف الرقم فقط ويتم تعطيل الأسهم المتجة إلى أعلى وإلى أسفل

ومعليش على كثرة الأسئلة

جزاك الله خيرا

38 للسهم اعلى

40 للسهم اسفل

لماذا لاتستخدم msgbox لعرض ارقام المفاتيح ؟

MsgBox KeyCode & Space(5) & Shift

استخدمها لعرض ارقام المفاتيح لكن لا تنسى ان تعرض في حالة

كون خاصية النموضج منبثق = ( لا )

يمكنك ان تنشىء نموذج جديد لعرض هذه الارقام .

عزيزي : أسامه

قمت بإنشاء نموذج جديد ووضعت فيه مربع نص ووضع في

حدث : عند الضغط على مفتاح

الكود هذا

MsgBox KeyCode & Space(5) & Shift

ولكنه لم ينج معي فهل في طريقتي خطأ

لأنك لم تخبرني أين أضع الكود الذي ذكرته

وياليت إذا كانت الطريقة صعبة أن تخبرني أنت أو أحد الأعضاء عن أرقام المفاتيح التالية : -

مفتاح :Page Up أعلى الصفحة

مفتاح :Page Down أسفل الصفحة

مفتاح : Home أول السطر

مفتاح : End آخر السطر

وإذا كان فيه إزعاج لكم فاعتبروا السؤال كأنه لم يكن ولكم مني وافر الاحترام والتقدير

وتقبلوا تحياتي

:o

عزيزي السعودي

ليس هناك اي احراج ...فنحن هنا في خدمة الجميع

اخي الكريم اليك الارقام التي طلبتها :

33 = PAGEUP

34 = PAGE DOWN

36 = HOME

35 = END

وشكرا

أخوي : أسامه جزاك الله ألف خير على سعة صدرك

وبارك الله لك في علمك

لقد توصلت إلى برنامج قمت بعمله أنا يخبرني عن أي رقم أريده في لوحة المفاتيح وذلك طبعاً من الأسئلة التي في المنتدى وأنا أضعه هنا لكي يستفيد غيري منه وحتى لا يضطر البعض إلى تكرار الأسئلة فمن يهمه أن يعرف رقم أي زر في لوحة المفاتيح فعليه تحميل البرنامج

ملاحظة : البرنامج على أكسس 97

http://mypage.ayna.com/kuo_kou/ARKAM.zip

والله من وراء القصد

ممكن ترسل لي الملف على بريدي

لاني ظغط رفض التحميل وسويت حفظ باسم

ما فاد وهاذي مشكلتي مع موقع اين فقط .

وجزاك الله خير

alhajri_f@hotmail.com