أهلا بكم

اقدم لكم وحدة نمطية تم تصميمها بواسطة Leandro Ascierto ،لإظهار أعمدة البيانات عنصر تحكم [ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذا الرابط] في شكل رسم بياني، في عمود محدد ، وبهذه الطريقة تصور السجلات في هذا العمود على أنها بيانات إحصائية ....يحتوي المثال بالمرفقات على نموذجين بسيطين يقومان بتحميل جدولين من قاعدة بيانات اكسس 

النموذج الذي يحمّل السجلات في جدول "الطلاب" ويعرض العمود المتوسط ​​كنموذج رسومي كما فى الشكل التالى 


الزر الآخر يقوم بتحميل جدول المنتج ويعرض الوحدات المباعة وهو النموذج الثانى كما فى الشكل التالى :

[rtl][/rtl]


يتم استخدام الوحدة البرمجية من خلال استدعاء الدالة Cargar_ListView كما فى الكود التالى :

الكود:

Call Cargar_ListView(ListView1, sql, _
                        cnn, 2, rsMax!Maximo, True, False, _
                        vbWhite, RGB(204, 221, 251), RGB(208, 233, 203), 2)

[rtl]ملاحظة:

كما ترى فى الكود اعلاه يجب تمرير المعلمات التالية إلى الدالة Cargar_ListView التي تملأ السجلات ثم نقل البيانات إلى [ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذا الرابط]

• اسم عنصر التحكم [ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذا الرابط] المراد استخدامه
  
• الاستعلام sql
  
• نص اتصال ADO صالح ، أو أي اتصال مفتوح
  
• أشر إلى فهرس العمود الذي سيتم استخدامه لعرض الرسم البياني
  
• القيمة القصوى التي يمكن أن يعرضها الحقل
  
• تشير القيمة bDisplayValue إلى ما إذا كانت القيمة معروضة ، إذا كانت خاطئة ، يتم عرض الرسم البياني فقط
  
• المعلمات الأخرى هي لون الخلفية والحدود و forecolor للرسم البياني
  

لتحميل الوحدة البرمجة مع المثال على الرابط التالى :

اشكرك أخي [ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذا الرابط] على مجهودك بالمنتدى