m.r قام بنشر نوفمبر 18, 2020 مشاركة قام بنشر نوفمبر 18, 2020 السلام عليكم تحية طيبة الى جميع اعضاء المنتدى الكرام. اخواني سؤال بسيط. كيف يتم عمل كود ليقوم بوقف زر (كنترول + F) من خلال الضغط عليهما من الكيبورد اثناء تشغيل النموذج. تحياتي رابط هذا التعليق شارك More sharing options...
أبوبسمله قام بنشر نوفمبر 18, 2020 مشاركة قام بنشر نوفمبر 18, 2020 وعليكم السلام قم بانشاء ماكرو وقم بتسميته AutoKeys كما بالصوره ثم قم بانشاء ماكرو فرعى بداخله كما بالصوره واكتب به F^ جرب ووافنا بالنتيجه بالتوفيق اخى 1 1 رابط هذا التعليق شارك More sharing options...
m.r قام بنشر نوفمبر 19, 2020 الكاتب مشاركة قام بنشر نوفمبر 19, 2020 اخوية الفلاحجي: جيد عاشت ايدك اكو فد طريقة يتم ايقاف جميع اوامر الكيبورد مثل ( كنترول +F+ F11+ F4) وهكذا للاخير. تحياتي رابط هذا التعليق شارك More sharing options...
ابو جودي قام بنشر نوفمبر 19, 2020 مشاركة قام بنشر نوفمبر 19, 2020 1 1 رابط هذا التعليق شارك More sharing options...
أبوبسمله قام بنشر نوفمبر 20, 2020 مشاركة قام بنشر نوفمبر 20, 2020 منور @ابا جودى وحمدالله على السلامه وجزاك الله خيرا على هذا الرابط بالتوفيق اخوانى 1 1 رابط هذا التعليق شارك More sharing options...
m.r قام بنشر نوفمبر 20, 2020 الكاتب مشاركة قام بنشر نوفمبر 20, 2020 شكرا جدا ابا جودي موفق🌹 تحياتي رابط هذا التعليق شارك More sharing options...
عبد الله قدور قام بنشر نوفمبر 21, 2020 مشاركة قام بنشر نوفمبر 21, 2020 السلام عليكم ورحمة الله وبركاته بالنسبة لي استخدم الكود التالي : Select Case KeyCode Case 70 And Shift = 2 '========ÇáÛÇÁ ÇÎÊÕÇÑ ctrl+f=========== KeyCode = 0 Case 72 And Shift = 2 '========ÇáÛÇÁ ÇÎÊÕÇÑ ctrl+h========== KeyCode = 0 End Select 1 رابط هذا التعليق شارك More sharing options...
m.r قام بنشر نوفمبر 21, 2020 الكاتب مشاركة قام بنشر نوفمبر 21, 2020 جيد عاشت ايدك عبد الله قدور 1 رابط هذا التعليق شارك More sharing options...
m.r قام بنشر نوفمبر 21, 2020 الكاتب مشاركة قام بنشر نوفمبر 21, 2020 خوية عبد الله قدور هذا الكود يكون في وحدة نمطية لو كيف رابط هذا التعليق شارك More sharing options...
m.r قام بنشر ديسمبر 1, 2020 الكاتب مشاركة قام بنشر ديسمبر 1, 2020 سلام عليكم اخي عبد الله قدور كيف يخلى الكود في وحدة نمطية خارجية حتى يطبق على القاعدة بأكملها (هل يمكن ؟) . رابط هذا التعليق شارك More sharing options...
ابو جودي قام بنشر ديسمبر 1, 2020 مشاركة قام بنشر ديسمبر 1, 2020 (معدل) منذ ساعه, m.r said: سلام عليكم اخي عبد الله قدور كيف يخلى الكود في وحدة نمطية خارجية حتى يطبق على القاعدة بأكملها (هل يمكن ؟) . هذا الروتين يكتب داخل الموديول Public Function AllowKeyCode(KeyCode As Integer, Shift As Integer) As Integer Select Case KeyCode Case 70 And Shift = 2 AllowKeyCode = KeyCode MsgBox ("turning off ctrl+f") Case 72 And Shift = 2 AllowKeyCode = KeyCode MsgBox ("turning off ctrl+h") Case Else AllowKeyCode = 0 End Select End Function ويتم استدعاء الامر فى زوايا التطبيق من خلال الكود الاتى KeyCode = AllowKeyCode(KeyCode, Shift) فى حدث KeyDown اما لاحد العناصر على النموذج او KeyDown للنموذج نفسه اعتذر تم الرد بتسرع دون الوقوف على الية عند تنفيذ الروتين الخاص بالكود ... وتم حل المشكلة تم تعديل ديسمبر 1, 2020 بواسطه ابا جودى تعديل الكود 1 رابط هذا التعليق شارك More sharing options...
m.r قام بنشر ديسمبر 1, 2020 الكاتب مشاركة قام بنشر ديسمبر 1, 2020 (معدل) شكرا ابا جودي موفق🌹 تحياتي تم تعديل ديسمبر 1, 2020 بواسطه m.r 1 رابط هذا التعليق شارك More sharing options...
ابو جودي قام بنشر ديسمبر 1, 2020 مشاركة قام بنشر ديسمبر 1, 2020 في ٢١/١١/٢٠٢٠ at 17:01, m.r said: هذا الكود يكون في وحدة نمطية لو كيف للعلم وللامانة الكود منقول من احد المواقع الاجنبية صادفتة من قبل ولما بحثت وتوصلت اليه نقلت دون تجربة بالنسبة لى التجربة من خلال موديول سيئة جدا جدا التطبيق بيهنج ويتجمد لا اهلم ان كان هناك عند اساتذتنا الافاضل حل لتلك المشكلة راى استخدام الكود مباشرة افضل 1 رابط هذا التعليق شارك More sharing options...
m.r قام بنشر ديسمبر 1, 2020 الكاتب مشاركة قام بنشر ديسمبر 1, 2020 عاشت ايدك ابا جودي تأكيد جدا مهم . تحياتي رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.