منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[Acces2010] مشكلة في زر التالي و السابق - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم أسئلة واستفسارات الأعضاء - المنتدى القديم (http://vb4arb.com/vb/forumdisplay.php?fid=94)
+--- قسم : مايكرسوفت أكسيس Microsoft Access (http://vb4arb.com/vb/forumdisplay.php?fid=170)
+--- الموضوع : [Acces2010] مشكلة في زر التالي و السابق (/showthread.php?tid=51320)



مشكلة في زر التالي و السابق - الجنرال أحمد - 30-01-25

أرجو المساعدة في البرنامج
عند الضغط علي زر التالي يعمل بشكل طبيعي و عند الضغط علي زر السابق و الوصول لاخر مستند يعطيني رسالة Bug و End
و أنا بصراحة نسيت الكود اللي يخليه ميطلعش الرسالة دي


RE: مشكلة في زر التالي و السابق - اسير الشروق - 22-03-25

بسيطه ان شاء الله
شوف الكود
كود :
On Error Resume Next
DoCmd.GoToRecord , , acPrevious
If Err.Number = 2105 Then
   MsgBox "لا يمكن الانتقال إلى السجل السابق، أنت في البداية"
End If
On Error GoTo 0

او

كود :
If Not Me.Recordset.BOF Then
   DoCmd.GoToRecord , , acPrevious
Else
   MsgBox "أنت بالفعل في السجل الأول"
End If