أخي الكريم
أعرض التقرير في وضع التصميم وأختر تفصيل ثم خصائص ثم أختر حدث ( عند التنسيق ) وأكتب الأسطرالتالي :
If Me.deb = 0 And Me.crd = 0 Then Me.explan.TextAlign = 3 If Me.deb = 1 And Me.crd = 1 Then Me.explan.TextAlign = 2 If Me.deb = 0 And Me.crd = 1 Then Me.explan.TextAlign = 1
ويمكنك تطبيق الشروط وفق رغبتك
بعد التحية والسلام
الأخ العزيز أبو ســـــــاره
اعتقد أن تصميم الكود كما تفضلت يجب أن يكون كالتالي ليحقق ماطلبته أنا :
If Me.deb = 0 And Me.crd = 0 Then Me.explan.TextAlign = 2 If Me.deb = 0 Then Me.explan.TextAlign = 3 If Me.crd = 0 Then Me.explan.TextAlign = 1
ومع ذلك فانه لايعمل عند وضعه في تنسيق صفحة التقرير !!!!!!!!!
ابو منتظر
أخي أبو منتظر
أنا أعطيتك الطريقة لكي تتبعها وتعدل على حسب رغبتك ولم أطبق لكود على التقرير.
عموماً لا يهمك _ لا بد من تطبيق الشرط على الحقلين معاً حتى تظهر النتيجه بالشكل المناسب
لقد قمت بكتابة الكود على نفس التقرير في مثالك على الشكل التالي:
If Me.deb = 0 And Me.crd = 0 Then Me.explan.TextAlign = 2 If Me.deb = 0 And Me.crd <> 0 Then Me.explan.TextAlign = 3 If Me.crd = 0 And Me.deb <> 0 Then Me.explan.TextAlign = 1
وهو يعمل في نفس الحدث عند التنسيق أو حدث عند الطباعة
وهذا المثال مرفق أخبرنا إذا لم يكن هذا ما تريد
الأخ العزيز أبا ســـــــــــارة
لقد تمَّ المطلوب وبارك الله فيك وأسعدَ أيامك بحلول عيد الفطر المبارك
-waf
هذا الموضوع مغلق.
المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية
جارٍ التحقق من المتواجدين…