النجاشي قام بنشر مارس 30, 2017 مشاركة قام بنشر مارس 30, 2017 السلام عليكم ورحمه الله وبركاته ما هي طريقه الانتقال بنموذج بحث عن فاتوره عنما اضغط زر End يظهر اخر سجل الانتقال لاخر سجل.rar رابط هذا التعليق شارك More sharing options...
وضاح النوبه قام بنشر مارس 30, 2017 مشاركة قام بنشر مارس 30, 2017 للرفع رابط هذا التعليق شارك More sharing options...
صالح حمادي قام بنشر مارس 31, 2017 مشاركة قام بنشر مارس 31, 2017 السلام عليكم تفضل أخي لقد أضفت 4 أزرار بالنموذج الرئيسي تمكنك من التنقل بين سجلات النموذج الفرعي (الأول, الأخير, السابق, التالي). البحث.rar 2 رابط هذا التعليق شارك More sharing options...
Shivan Rekany قام بنشر مارس 31, 2017 مشاركة قام بنشر مارس 31, 2017 12 ساعات مضت, ابو زاهر said: السلام عليكم ورحمه الله وبركاته ما هي طريقه الانتقال بنموذج بحث عن فاتوره عنما اضغط زر End يظهر اخر سجل الانتقال لاخر سجل.rar هل قصدك بزر End اللي على كيبورد اذا الجواب نعم استخدم هذا الكود Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer) If KeyCode = 35 Then DoCmd.GoToRecord , , acLast End If End Sub لكن يجب ان يكون خاصية النموذج كى بريفيو بيكون نعم او يجب ان تستخدم هذا الكود معه في حدث عند فتح او تحميل النموذج Private Sub Form_Load() Me.KeyPreview = True End Sub واذا ما كان قصدك اللي في كيبورد استاذنا @صالح حمادي عمل لك اربع ازرار اتفچل مع قاعده بيانات بها الكود الاعلاه تحياتي الانتقال لاخر سجل.rar 4 رابط هذا التعليق شارك More sharing options...
النجاشي قام بنشر مارس 31, 2017 الكاتب مشاركة قام بنشر مارس 31, 2017 السلام عليكم ورحمه الله وبركاته استاذي شفان صالح حمادي بارك الله فيكم هذا هو المطلوب شاكر لكم من كل قلبي استاذتي 1 رابط هذا التعليق شارك More sharing options...
صالح حمادي قام بنشر مارس 31, 2017 مشاركة قام بنشر مارس 31, 2017 (معدل) 48 دقائق مضت, Shivan Rekany said: هل قصدك بزر End اللي على كيبورد اذا الجواب نعم استخدم هذا الكود Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer) If KeyCode = 35 Then DoCmd.GoToRecord , , acLast End If End Sub لكن يجب ان يكون خاصية النموذج كى بريفيو بيكون نعم او يجب ان تستخدم هذا الكود معه في حدث عند فتح او تحميل النموذج Private Sub Form_Load() Me.KeyPreview = True End Sub واذا ما كان قصدك اللي في كيبورد استاذنا @صالح حمادي عمل لك اربع ازرار اتفچل مع قاعده بيانات بها الكود الاعلاه ما شاء الله عليك صديقي Shivan Rekany أنت دائما في الموعد تم تعديل مارس 31, 2017 بواسطه صالح حمادي 1 رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
من فضلك سجل دخول لتتمكن من التعليق
ستتمكن من اضافه تعليقات بعد التسجيل
سجل دخولك الان