أحمد مناع كتب:أهلا وسهلا بك أخى الكريم سالم

مشاريع ActiveX DLL هى المشاريع التى تمكنك من بناء مكونات COM أو ملفات dll وهى عبارة عن وحدات برمجية يمكنك برمجتها و توزيعها مع مشروعك القياسى أما من ناحية كيفية انشاء تلك الملفات فابسط مثال على النحو التالى :

1_ نقوم بفتح الفجوال بيسك 6 ومن نافذة new project نختار نوع المشروع  ActiveX DLL



_ بعد ذلك أفتراضيا سيتم سيتم إنشاء الفئة Class1.cls و المشروع  Project1.vbp.و يمكنك تغير تسمية الفئة أو المشروع  وليكن ClsName أذا أحببت

_ الان نقوم بكتابة ما نريدة من هذا المكون com أو الملف dll لفترض أننا نريد أنشاء ملف dll بحيث يحتوى على وظيفة اظهار رسالة MsgBox  بنص معين Your Name is أذن سنقوم بكاتبة التعليمات البرمجية على النحو التالى :

الكود:

Function Name(aName As String)
   MsgBox ("Your Name is " & aName)
End Function


_ الان نقوم بإنشاء الملف dll وذلك من خلال القائمة File ثم أختيار الامر Make Project1.dll وهو اسم المشروع الذى نعمل علية :



_ بعد ذلك ستجد أنه تم إنشاء ملف dll داخل مجلد المشروع و يمكنك استخدام هذا الملف فى مشروعك القياسى

فمثلا سنقوم بانشاء مشروع قياسى مكون من نافذة و زر أمر ثم نقوم بادراج ملف dll الى المشروع القياسى كما فى الصورة التالية :






وفى حدث النقر لزر الامر نقوم بكتابة الكود التالى لاستخدام ملف dll الذى تم ادراج للمشروع و استخدام وظائفة

الكود:

Dim b As New ClsName
b.Name "ahmed"


هنا قمنا باشتقاق مثيل جديد من الفئة ClsName و استخدمنا الوظيفة الوحيدة التى بها Name

و التى يتم تمرير لها نص لتظهر رسالة كما فى الشكل التالى بناء الكود السابق

الان يمكنك انشاء الكثير من الفئات و كل فئة يمكنك انشاء بها الكثير من الوظائف و استخدامها على النحو المبين أعلاه