(تمت الاجابة) كيف ألغي مفتاحى الانتقالEnter-Tab

[كريم عز الدين]

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

متشكر لمرور حضراتكم واهتمامهكم

هل من الممكن الغاء مفتاحى الانتقال Enter - Tab حتى لا يمكن استخدامهم فى النموذج

[G42U]

[

مرحباً بك اخي

ضع هذا الكود في الحدث (عند فتح النموذج) form open

    On Error Resume Next
    
    Dim ctl As Control

    For Each ctl In Me.Controls
        ctl.TabStop = False
    Next ctl

TabStop هوللتحكم بخاصية الانتقال بين العناصر في النموذج

[كريم عز الدين]

الأخ الكريم والزميل الفاضل / G42U

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

اشكرك لمحاولة مساعدتى ومد يد العون لى ... لقد قمت بتنفيذ ما اوضحته بمشاركة حضرتك لكن للاسف دون فائدة لا اعلم سبب عدم تنفيذ ذلك وهل يرجع فشل ذلك لأنى استخدم اوفيس 2000 عربى وليس انجليزى .. لا اعلم .

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

ملحوظة :-

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

انتهت الملحوظة .

_________________Enter___Tab_________________________.rar

[G42U]

آسف أخي فعلى ما يبدو انني فهت الموضوع غلط

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

في المثال المرفق

انا قمت بإيقاف عمل

ENTER,PAGEUP, PAGEDOWN AND TAB

اما بالنسبة لايقاف عمل SCROLL فليس عندي فكرة عن ذلك حالياً, ولاكني اتذكر انه هناك موضوع في المنتدى يتعلق بإيقاف عمل SCROLL , حاول البحث في المنتدى

انظر المثال المرفق بعد التعديل

ENTER_AND_TAB_KEYS.rar

تم تعديل أغسطس 4, 2007 بواسطه G42U

[كريم عز الدين]

الأخ الكريم والزميل الفاضل / G42U

الف الف شكر يا أخى على استمرارية دعمك لى وتفهمك ما قصدته من استفسارى بشأن هذا الموضوع

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

لك منى جزيل الشكر على عطائك وجهدك المبذول .

[G42U]

عفواً اخي كريم

انظر المثال بعد إيقاف سكرول الماوس

المصدر

How to Detect and Prevent the Mouse Wheel from Scrolling Through Records in a Form

ENTER_AND_TAB_KEYS_2.rar

[كريم عز الدين]

الأخ الكريم والزميل الفاضل / G42U

مش عارف اشكر حضرتك ازاى ... ربنا يخليك لينا وما يحرمناش من ذوقك ابدا

جزاك الله خيراً على كل ما قدمته لى ولباقى زملائى ... ذادك الله من العلم بما ينفعك لتنفع به غيرك