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

السلام عليكم
عندي تقرير عند الطباعة يكون بطول ورقة A4
كما في الصورة الاوله
ولم استطيع ان اجعلها كما فى الصورة الثانيه
اريد حذف الفراغ مرفق مثال للتعديل
ارجو المساعدة
[صورة مرفقة: 8pXXFm.jpg]

و عليكم السلام ورحمة الله

الحل بسيط قم بتحويل Thank you في جزء Body من التقرير

اي بمعني آخر قم بإزالة Footer وهي السبب في وضع العبارة في آخر الصفحة

مثل الصورة
[attachment=6700]

لي تعليق بسيط على الكود المستخدم لماذا لا تستخدم إجراء لملئ Dataset بالبيانات بدلاً من التكرار واستخدام Loop وفي كل مرة تقوم بتعرف المتغير ro من جديد

مثل هذا

PHP كود :
Private Sub FillData(ByVal sItem As String, ByVal sQuantity As String, ByVal sPrice As String, ByVal sCategory As String)
       Dim ro As DataRow = DataSet1.DataTable1.NewRow
       ro("DataColumn1") = sItem
       ro("DataColumn2") = sQuantity
       ro("DataColumn3") = sPrice
       ro("DataColumn4") = sCategory
       DataSet1.DataTable1.Rows.Add(ro)
   End Sub 

وعندما تود اضافة الاصناف سوف تقوم باستدعائها هكذا

PHP كود :
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
       FillData("كابتشينو شوكلاته", "1", "20", "Preserves")
       FillData("ميرندا تفاح", "1", "20", "Preserves")
       FillData("ميرندا تفاح", "1", "3.5", "Drink")
       FillData("ميرندا برتقال", "1", "3.5", "Drink")
       ReportViewer1.RefreshReport()
   End Sub 

هل رأيت اختصرت على نفسك الأسطر العديدة ، خاصة لو كانت الأصناف تأتي من قاعدة بيانات

شكرا اخي علي الرد
فعلا اختصار الكود جميل
ولكن عند وضع كلمة Thank you بال Body وقمنا بانشاء قروب لن تظهر كلمة Thank you الا في الصفحة الاخيرة
مرفق البرنامج لا تظهر كلمة Thank you فى الصفحة الاولة

لم افهم ما المطلوب بالضبط ؟
التقرير الأول يظهر كلمة Thank you بعد نهاية كل الصفوف

هل المطلوب طباعة بحسب Category لأنني لاحظت انك اضفت Group

ارجوك اشرح اكثر لنعرف بالضبط المطلوب وما شكل التقرير الذي تريده؟ حتى لو رسمته بالرسام بعيداً عن البرمجة

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

mohameed2015

Clickers

mohameed2015

Clickers