monm قام بنشر أغسطس 8, 2017 مشاركة قام بنشر أغسطس 8, 2017 عند الضغط على مفتاح معاينة التقرير المبنى على استعلام عندم لا يوجد به بيانات اريد أن يكتب عبارة لا يوجد طلاب واذا كان الاستعلام به سجلات يقوم بفتح التقرير dgree.rar رابط هذا التعليق شارك More sharing options...
Shivan Rekany قام بنشر أغسطس 9, 2017 مشاركة قام بنشر أغسطس 9, 2017 منذ ساعه, monm said: عند الضغط على مفتاح معاينة التقرير المبنى على استعلام عندم لا يوجد به بيانات اريد أن يكتب عبارة لا يوجد طلاب واذا كان الاستعلام به سجلات يقوم بفتح التقرير dgree.rar عندك طريقتين اولا والاولى هو ان تكتب هذا تلصق في محرر فيجوال للتقرير Private Sub Report_NoData(Cancel As Integer) MsgBox "لا يوجد طلاب" Cancel = True End Sub والطريقة الثانية هو كتابة الكود عند الضغط على زر فتح التقرير وهو Private Sub أمر0_Click() If DCount("*", "main1") = 0 Then MsgBox "لا يوجد طلاب" Else DoCmd.OpenReport "Rep2", acViewPreview DoCmd.Maximize End If End Sub اتفضل اليك قاعدتك بعد تعديل بكلا طريقين dgree (2).rar 1 رابط هذا التعليق شارك More sharing options...
monm قام بنشر أغسطس 9, 2017 الكاتب مشاركة قام بنشر أغسطس 9, 2017 لك جزيل الشكر والتقدير على الاستجابة السريعة والسؤال لماذا لم يصلح استخدام if main1 is null لقد استخدمتها وحضرتك غيرتها نرجوا شرح الكود وشكرا رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
من فضلك سجل دخول لتتمكن من التعليق
ستتمكن من اضافه تعليقات بعد التسجيل
سجل دخولك الان