السلام عليكم ورحمة الله وبركاته
إخواني الأعضاء ...
في البرنامج المرفق يوجد تقرير في حالة عدم وجود بيانات فإن الناتج يساوي Error
وأريد استبدال هذه القيمة بــ صفر
وشكرا جزيلا
السلام عليكم ورحمة الله وبركاته
إخواني الأعضاء ...
في البرنامج المرفق يوجد تقرير في حالة عدم وجود بيانات فإن الناتج يساوي Error
وأريد استبدال هذه القيمة بــ صفر
وشكرا جزيلا
وعليكم السلام ورحمة الله وبركاته...
هذه أخي واحدة من الطرق الممكنة لمعالجة هذا الموضوع، وميزتها أنها تسمح للمستخدم بمعاينة الحقول الفارغة في التقرير. أرجو الاطلاع على الملف المرفق.
هناك طريقة أخرى، وهي استخدام الحدث NoData للتقرير لإغلاق التقرير فوراً، وربما بعد عرض رسالة مناسبة، كالتالي:
Private Sub Report_NoData(Cancel As Integer)
MsgBox "لا يحوي التقرير بعد أي بيانات", vbInformation, "No Data"
Cancel = True
End Subالطريقة في الملف المرفق تعتمد على استخدام هذا الحدث ليس لإغلاق التقرير، وإنما لإعداد الخاصية tag لحقل Days إلى 0 مثلاً. ثم إعداد مصدر الحقل Text13 ليفحص أولاً هذه الخاصية، فإذا كانت صفراً فإنه يعيد صفراً كمجموع، وإلا فإنه يعمل بشكل اعتيادي ويحسب المجموع.
والله أعلم.
جزاك الله خيرا يا أخي أحمد
ولكن ... استعملت هذا التقرير كتقرير فرعي في التقرير الرئيسيTable2 .. وقمت بنقل قيمة Text13 من التقرير الفرعي إلى الرئيسي في totalDays إلا أن القيمة في التقرير الرئيسي = Error
على الرغم من أنها في التقرير الفرعي =0
أرجو المساعدة
************************
تم تعديل هذه المشاركة بواسطة أيمن الزعبي في 2 أغسطس 2010 في 11:12
هذه طريقة أخرى تم تطبيقها على التقريرين: الرئيس والفرعي... انظر مصدر حقلي المجموع في التقريرين.
ألف شكر يا غالي ....
جزاك الله خيرا وجعله بميزان حساناتك .... :blush:
*****************************
من لا يشكر الناس لا يشكر الله
****************************
المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية
جارٍ التحقق من المتواجدين…