22-03-25, 09:28 PM
(آخر تعديل لهذه المشاركة : 22-03-25, 09:29 PM {2} بواسطة اسير الشروق.)
بسيطه ان شاء الله
شوف الكود
او
شوف الكود
كود :
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