الرجاء المساعدة رسالة تظهر للمستخدم في حالة عدم وجود كود للصنف

[Ahmed Fahmy 2022]

عاوز استبدل الرساله االلي في الصورة برسالة ان هذة الكود غير موجود في حالة ان رقم الصنف اي الكود غير موجود في قائمة الاصناف

وللعلم انا باستخدم القارئ عن طريق الموبيل 

الرجاء الافادة

شكرا جزيلا

 

تم تعديل أبريل 2, 2021 بواسطه 200200ahmed

[محمد أبوعبدالله]

السلام عليكم

يمكنك استخدام الكود التالي في حدث قبل التحديث لعنصر كود الصنف

    If Me.RecordsetClone.RecordCount = 0 Then
        MsgBox " لاتوجد بيانات", vbInformation, "officena"
        DoCmd.CancelEvent
        Exit Sub
    End If

تحياتي