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

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

المشكلة لدي تقارير بعدد 10 تقرير كلها نفس الاتصال ونفس التقرير
Dim 1 as new cry
Dim 2 as new cry
Dim 3 as new cry
Dim 4 as new cry
Dim 5 as new cry
Dim 6 as new cry
Dim 7 as new cry
Dim 8 as new cry
Dim 9 as new cry
Dim 10 as new cry

اللهم أن الحجم متنوع لذالك لا استطيع استخدامها في نفس الحدث لأن التقرير اعتمد عليها مئات الاجراات من كتابة نصوص وادخال حسابات وصور ....الخ

مثال

if a  = 1 then
اختر التقرير 1
elseif a = 2 then
اختر التقرير 2
end if

الأن المشكلة العويصة *_- كيف يتم اختيار تقرير ليصبح عام يعتمد على كل الاجراءات السابقة ^

مثال اخر
Dim rpt As New CRY
تبديل CRY حتى استطيع الاعتماد على متغير rpt

ان شاء الله وصلت (:

ممكن توضح مقصدك بكلمة أن الحجم متنوع؟

المفروض ان الكلاس Cry به نفس الدوال و الاجراءات او ان الاصل لجميع الكلاسات واحد
مثلا افترضنا انك بتستخدم interface معين لتبني هذا الكلاس بالتالي الكلاس نفسه لا يتغير لكن المعطيات الخارجة من الكلاس هي التي تتغير

عموما ممكن تضيف التقارير الي Generic Dictionary وتعطي كل تقرير اسم مختلف و تستدعي كل تقرير حين تحتاجه

,