الشكر موصول الى الاخوة والى الاخ راعي الغنم
لماذا زر حفط وزر سجل جديد من المفترض انك تقوم بادخال البيانات عن طريق الباركود فانت لا تحتاج الى ضافة سجل جديد كل ما تحتاجة هو كود يتم اضافة على الكود الذي وضعة الاخ راعي الغنم ويكون كتالي
Private Sub BARCODE_Exit(Cancel As Integer)
Me.ITEMs.Value = DFirst("[iTEMs]![iTEMs]", "[iTEMs]", "[bARCODE] = [Forms]![sale]![bARCODE]")
Me.DESCRIPTION.Value = DFirst("[iTEMs]![DESCRIPTION]", "[iTEMs]", "[bARCODE] = [Forms]![sale]![bARCODE]")
DoCmd.GoToRecord
End Sub