السلام عليكم ورحمة الله وبركاته
الاخوة الافاضل المشرفون بمنتدى الفريق العربي للبرمجة المحترمون
لدي مشكلة في كود التنقل لمفاتيح الاسهم يمين يسار لا تعمل ولقد بحثت كثيرا في منتداكم لايجاد حل للمشكلة ولكني لم اجد الحل فارجوا شاكرا الاطلاع على المشكلة بالمرفق
ولكم جزيل الشكر
تم تعديل هذه المشاركة بواسطة فيصل عبدالله* في 25 أكتوبر 2014 في 04:37
:rolleyes: الكلمة الطيبة جواز مرور إلى كل القلوب :rolleyes:
ارجوا المعذرة
حاولت رفع الملف المرفق ولم يتم التحميل
:rolleyes: الكلمة الطيبة جواز مرور إلى كل القلوب :rolleyes:
وعليكم السلام اخي :)
سؤالك غير واضح :(
رجاء الايضاح بمثال ويفضل بصور كذلك ان امكن :)
جعفر
شكرا اخي جعفر على الرد
واود ان اوضح لك بانني قد ارفقت مرفق ويوجد به الكود والنموذج ، وبامكانك تحميل المرفق وتجربته وسترى ان مفاتيح الاسهم للتنقل لليمين واليسار لا تعمل بواسطة الكود
وهذا هو الكود الذي استخدمة :
Private Sub movkey(Keymode As Integer)
On Error Resume Next
Select Case Keymode
Case vbKeyDown
DoCmd.GoToRecord , , acNext
Case vbKeyUp
DoCmd.GoToRecord , , acPrevious
Case vbKeyLeft
SendKeys "{TAB}", True
Case vbKeyRight
SendKeys "+{TAB}", True
End Select
End Sub
:rolleyes: الكلمة الطيبة جواز مرور إلى كل القلوب :rolleyes:
طيب:
1. اذا كنت على اول خانة على اليمين ، وضغطت على زر السهم اليمين ، ويش لازم يصير ؟
2. اذا كنت على اخر خانة على اليسار ، وضغطت على زر السهم اليسار ، ويش لازم يصير ؟
جعفر
اخي جعفر
اذا ضغطت مفتاح السهم الايسر ينتقل المؤشر لليسار
واذا ضغطت مفتاح السهم الايمن ينتقل المؤشر لليمين
هذا كل ما في الامر
وسؤالي لماذا لا يستجيب الكود
تم تعديل هذه المشاركة بواسطة فيصل عبدالله* في 25 أكتوبر 2014 في 21:56
:rolleyes: الكلمة الطيبة جواز مرور إلى كل القلوب :rolleyes:
تفضل :)
انت لا تحتاج الى كود لهذا العمل ، وانما لإعادة تنظيم Tab Index الحقول ، فكل الذي عليك فعله هو اعادة الترقيم كما هو في الصورة المرفقة:
جعفر
اخي جعفر
لقد تأكدت من Tab Index ولا يوجد به اي خلل وهي مرتبة كما اشرت انت ، وبامكانك التأكد من الملف المرفق
وللعلم هذا الكود قامت بعمله الاستاذة أم عهود وكان يعمل عندي بشكل طبيعي قبل عام تقريبا ولكن فجأة لم يعد يستجيب
فأرجوا منك التواصل مع الاستاذة أم عهود اذا امكن ذلك لتفيدنا حول هذه المشكلة
ولك مني خالص التحية والشكر والعرفان على تفاعلك الجاد
:rolleyes: الكلمة الطيبة جواز مرور إلى كل القلوب :rolleyes:
اخي جعفر احب ابشرك
الحمدلله لقد وجدت الحل
وهو كتابة الكود الخاص بـهذا الشكل :
Private Sub movkey(Keymode As Integer)
:rolleyes: الكلمة الطيبة جواز مرور إلى كل القلوب :rolleyes:
اخي فيصل :)
بهذا الامر:
SendKeys "{TAB}", True
فانت تأمر الكمبيوتر ان يتصرف كأنه ضغط على زر TAB ، وهو ما يجعل تنقل الايقونه من حقل الى آخر ،
ولما تعطيه الامر مرتين ، فانك كأنما تضغط مرتين ، اي الذهاب الى الحقل الاول ثم الثاني !!
انا جربت مرفقك السابق ، واتضح انه يشتغل بدون مشاكل!!
نصيحتي لك بأن تفحص برنامجك الاكسس ، وقاعدة بياناتك ، فقد يكون في احدهما عطب ، مما لا يجعلها تقبل الاوامر بطريقة صحيحة :(
لأنك لو اعطيت شخص آخر برنامجك ، فسيلاحظ المشكلة ، وسيرجع اليك بالخطأ الذي سيلاحظه :(
جعفر
اخي جعفر
شكرا على ملاحظتك الدقيقة ، وفعلا كلامك صحيح ، ويبدوا ان المشكلة سببها الويندوز7 ، والملاحظ ايضا أن الكود كان قبل عام يعمل بدون مشاكل وهذا دليل على صحة كلامك
ساكون على تواصل معك اذا حدثت أي مستجدات بخصوص المشكلة
مرة ثانية اشكر تواصلك الدائم ، ومتابعتك للموضوع
لك مني جزيل الشكر والامتنان
:rolleyes: الكلمة الطيبة جواز مرور إلى كل القلوب :rolleyes:
طيب جرب المرفق ، واللي انا عملته حسب مشاركتي رقم 9 :)
يعني الاسهم اليمين واليسار ما خليت لهم كود ، وانما تنتقل الى الجهتين حسب ترتيبي لـ Tab Index :)
ورجاء تخبرنا نتيجة التجربة :)
جعفر
المعذرة لم الاحظ وجود تعليقك الاخير
وغدا ان شاء الله اخبرك بالنتيجة وانا في العمل
:rolleyes: الكلمة الطيبة جواز مرور إلى كل القلوب :rolleyes:
اخي جعفر
الف مبرووووووووووووك نجحت الطريقة علما انني استخدمتها مسبقاً في المشاركة رقم 9 التي اشرت اليها ، ولكني لم انتبه لايقاف الكود SendKeys "{TAB}", True ولذلك اخبرتك ان المشكلة لا تزال موجودة
اسمى آيات التهاني والتبريكات اقدمها لك اخي الكريم جعفر ، كما اقدمها ايضا لهذا المنتدى العظيييييييييييييم الذي اصبح اليوم لا غنى لنا عنه ، ونسأل الله أن يجعل هذا في ميزان حسناتهم
:rolleyes: الكلمة الطيبة جواز مرور إلى كل القلوب :rolleyes:
حياك الله :)
وانت اللي الف مبرووووووووووووك :)
جعفر
المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية
جارٍ التحقق من المتواجدين…