الى خبراء الداتا ريبورت

إرفق المثال حتى يمكن التعديل عليه

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

اخي عادي جداً

نفرض انه تكست رقم السجل المدني الخاص برقم البطاقة اسمه Text1

ويوجد به عشرة ارقام ((ارقام السجل المدني الخاص بالبطاقة))

في التقرير تضع عشرة ليبل الخاصة بعرض رقم البطاقة أو السجل المدني ولنفرض أنها مرقمة من Label1 حتى Label10 قم بوضعها في أي مكان ولنفرض إنه تم وضعها في Section4 مثلاً

في كود الطباعة ضع الكود التالي

dataerport1.sections("section4").controls("label1").caption = mid(text1,1,1)

dataerport1.sections("section4").controls("label2").caption = mid(text1,2,1)

dataerport1.sections("section4").controls("label3").caption = mid(text1,3,1)

dataerport1.sections("section4").controls("label4").caption = mid(text1,4,1)

dataerport1.sections("section4").controls("label5").caption = mid(text1,5,1)

dataerport1.sections("section4").controls("label6").caption = mid(text1,6,1)

dataerport1.sections("section4").controls("label7").caption = mid(text1,7,1)

dataerport1.sections("section4").controls("label8").caption = mid(text1,8,1)

dataerport1.sections("section4").controls("label9").caption = mid(text1,9,1)

dataerport1.sections("section4").controls("label10").caption = mid(text1,10,1)

ثم ضع كود عرض التقرير .. أرجو أن أكون وضحتلك الفكرة .. تحياتي