الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

استكمال التقرير باسطر فارغة

بدأه morad2012 في 6 أكتوبر 2012 · 5 رد · 449 مشاهدة · في قواعد بيانات Microsoft Access
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

بسم الله الرحمن الرحيم

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

طمعاً بكرمكم ،،،

فضلاً لا أمرا ،،،

في المثال المرفق ،،، جدول به أسماء وتقرير ،،، ما أريده أن تستمر الأسطر بعد الاسماء على حسب الحاجة

مثلا عندي عشرين اسماً اريد ان يستكمل التقرير بعشر او عشرين سطر فارغ تلقائياً ،،،

المثال يوضح المطلوب أكثر ،،،

Continuous_ lines.rar

اذا دعتـــك قدرتك على ظلـــم الناس   فتذكر قدرة الله عليــــــك

#2

post-205827-010614200 1349530776_thumb.pأضف 20 سجلا بالجدول

واجعل الاسم يساوى مسطرة المسافات

المرفقات
Capture.PNG
#3

اخي ابو لميس شكراً لكـ على متابعتك للموضوع ،،، ومحاولتك المساعدة في الحل

لم أفهم أخي ما تقصد ،،،

رغم أني افضل أن يكون الحل برمجياً لتعدد الاستخدام ،،،

بارك الله فيك

في انتظار حلول اخرى

اذا دعتـــك قدرتك على ظلـــم الناس   فتذكر قدرة الله عليــــــك

#4

تفضل اخي الكريم

post-15367-075960600 1349544534_thumb.gi

سوف نستخدم هذا الكود البرمجي لإنشاء صفوف التقرير

Private Sub Report_Page()
Dim intNumLines As Integer
Dim intLineNumber As Integer
Dim intTopMargin As Integer
Dim ctl As Control
Dim intLineHeight As Integer
Dim intLineLeft As Integer
Dim intLineWidth As Integer
intNumLines = 50
intLineLeft = 720
intLineWidth = 1440 * 5
intTopMargin = Me.Section(3).Height
intLineHeight = Me.Section(0).Height
For intLineNumber = 0 To intNumLines - 1
Me.Line (intLineLeft, intTopMargin + (intLineNumber * intLineHeight))-Step(intLineWidth, 0)

Next
End Sub

يمكنك التحكم في عدد صفوف التقرير حسب العدد المطلوب في هذا السطر

intNumLines = 50

وضعت لك 50 سطر منها 20 بها بيانات و 30 سطر فارغ بإمكانك التعديل على الرقم فقط حسب رغبتك

لا تنسانا من التقييم بارك الله بك

za-Continuous_ lines-UP.rar

بالتوفيق

المرفقات
XX.gif

تم تعديل هذه المشاركة بواسطة zahrah في 6 أكتوبر 2012 في 20:33

7
#5

بارك الله فيكـ أختنا أم عهود على هذا الحل الرائع ،،، وآسف ان فهمتي كلمة سطر كما تم في الحل

ما قصدته بارك الله فيكـ ان يستكمل التقرير بنفس المربعات المعبأة ولكن فارغة بهذا الشكل ::

تستحقين اكثر من التقييم ،،، ولكن لا يسعنى أن نقدم غيره

الف شكر مرة ثانية ،،،

في انتظار الحل المطلوب بإذن الله

post-251232-057693800 1349559064_thumb.j

المرفقات
ss.JPG

اذا دعتـــك قدرتك على ظلـــم الناس   فتذكر قدرة الله عليــــــك

#6

ممتاز جدا

كنت أبحث عنه

جزاك الله خيرا

−1

مواضيع مشابهة