منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

أهلا , هذا تعديل المثال بناءً على قياسات هوامش التقرير طلع أن يكون الحد الأقصى لعدد الصفوف في الصفحة الواحدة هو 23 صف , وأيضاً إذا كان عدد الأرقام فقط التابعة لكل إسم أكثر أو تساوي 23 في هذه الحالة مانقدر نسوي شي .

اضغط على  
Group
ومن الخصائص
Newpage = Before
فقط
راح تلاقي كل عميل في صفحة لوحدة

وهذا المثال بعد التعديل

السلام عليكم المطلب غير واضح حتى مع المثال
ارجو التوضيح اكثر ليتسنى لنا مساعدتك

(20-12-14, 05:36 PM)السلام عليكم ورحمة الله     يمكن تحديد عدد السجلات لكل صفحة في آكتيف ريبورت كما يلى كتب : [ -> ]

كود :

dim tb as integer

 

كود :

Private Sub Detail_Format()

if (tb Mod 10) =0 then
detail.NewPage = ddNPAfter
else
detail.NewPage = ddNPNone
end if

tb = tb + 1
end sub

كود :

private Sub ActiveReport_ReportStart()
tb = 1
end sub

تسلمووووووووو اخواني