ارغب بعمل حدث عند الضغط على زر انتر على سبيل المثال ادا وضعنا مربع نص وكتبنا(فتون) ثم ضغطنا على زر انتر يخرج رسالة
مع شكري
ارغب بعمل حدث عند الضغط على زر انتر على سبيل المثال ادا وضعنا مربع نص وكتبنا(فتون) ثم ضغطنا على زر انتر يخرج رسالة
مع شكري
أخي الكريم يمكنك فعل ذلك عن طريق استخدام حدث KeyDown
لكل زر على لوحة الكي بورد كود خاص به بامكانك معرفة اكواد جميع ازرار لوحة المفاتيح عن طريق الدخول الى قائمة المساعدة في اكسس واكتب فقط كلمة keycode في مربع البحث يظهر لك قائمة بكودات المفاتيح
قم بانشاء حدث على مربع النص او القائمة او اي شيء تريد ان يقع الحدث عليه عندما تضغط مفتاح انتر وبعد ذلك ضع جملتك البرمجية مثال
Private Sub PrName_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = (vbKeyF3) Then DoCmd.OpenForm "searchresults"
End Sub
في هذا المثال تم تطبيق الحدث على مربع نص يسمى prname بحيث يتم فتح نموذج اخر عند الضغط على f3 عندما يكون التركيز على مربع prname
أرجو ان اكون قد تمكنت من المساعدة