المطلوب في البرنامج المرفق :
ظهور رسالة في حالة عدم وجود بيانات في النموذج الثاني tb2
السلام عليكم اخي جعفر
باستخدم الدالة Dcount والتي تقوم بعد عدد السجلات فى مصدر بيانات النموزج نتمكن من التوصل لعدد السجلات فاذا كان صفر يعني لا سجلات
لذلك قمت بانشاء استعلام لمصدر بيانات نموزج2 حتي نتمكن من استخدام Dcount
مرفق المطلوب
اخوك فى الله
Microsoft Certified DataBase Administrator MCDBA
وعليكم السلام أخي أحمد .. ومشكور جزيلاً
وإضافة إلى الكود الموجود في tb2 عند الفتح يمكن استخدام الكود التالي :
If Me.Recordset.RecordCount = 0 Then MsgBox "لايوجد بيانات", vbCritical, "بيانات" DoCmd.Close End If