منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
ازالة المسافة الفارغة - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم قواعد البيانات (http://vb4arb.com/vb/forumdisplay.php?fid=40)
+--- قسم : قسم اسئلة التقارير والطباعة تحت بيئة الـ.NET (http://vb4arb.com/vb/forumdisplay.php?fid=71)
+--- الموضوع : ازالة المسافة الفارغة (/showthread.php?tid=11575)

ازالة المسافة الفارغة - mohameed2015 - 02-03-15

السلام عليكم 
عندي تقرير عند الطباعة يكون بطول ورقة A4 
كما في الصورة الاوله
ولم استطيع ان اجعلها كما فى الصورة الثانيه 
اريد حذف الفراغ مرفق مثال للتعديل
ارجو المساعدة


RE: ازالة المسافة الفارغة - Clickers - 02-03-15

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



الحل بسيط قم بتحويل 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 


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

RE: ازالة المسافة الفارغة - mohameed2015 - 03-03-15

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

RE: ازالة المسافة الفارغة - Clickers - 03-03-15

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

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

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