دورة تعليم البرمجة باستخدام Vb6 على صفحات المنتدى

الجزء الأول: Active Skin

تعد مرحلة التصميم من أهم مراحل البرمجة وأكثرها فائدة، إذ أن الانطباع الأولي للبرنامج ينشأ عن الشكل العام للبرنامج، وربما يكون البرنامج ضعيفاً ولكن البعض يفضله على غيره لتناسق ألوانه وجمال تصميمة، ومن أهم الأدوات المساعدة في هذا الصدد أداة الأكتف سكن وهي أداة بسيطة جداً ومميزة جداً تقوم بتغيير واجهة البرنامج من الواجهة التقليدية لبرامج الفيجول إلى واجهات اكثر تقدماً ورقياً:

أداة الأكتف سكن Active Skin هي أداة تسمح لك بتغيير واجهة البرنامج من الواجهة التقليدية لبرامج الفيجول بيسيك إلى واجهات أخرى أكثر احترافية وجميلاً ...

ولكي نقوم باستخدام هذه الأداة في البرنامج الخاص بنا، فإننا سنحتاج إلى:

[1] ملف الـ ocx الخاص بالأداة، والذي سنقوم بوضعه في مجلد النظام - (system32) لمستخدمي الويندوز إكس بي، و(system) لمستخدمي الإصدارات الأخرى -.

[2] ملف الـ skn، وهو عبارة عن الملف الذي سيحتوي على الواجهة التي ستطبقها على برنامجك، وبإمكانك نسخه على مجلد البرنامج مباشرة

اسم الأداة: ActiveSkin 4.0 .. حجمها: 360 ك ب.
طريقة الاستخدام: أولاً لابد أن يكون لدينا ملفين الأول هو ملف الأداة ذو الامتداد ocx، ويمكنك تحميلة من الملف المرفق، والثاني هو ملف ذو امتداد skn ويحتوي على شكل الواجهة الجديدة، ويمكنك تحميل بعض هذه الملفات والتي أرفقتها مع هذا الموضوع ...
الآن قم بنسخ الملفين على مجلد البرنامج، وبعدها قم بإدراج ملف الأداة في الفورم، وذلك عن طريق الضغط على Ctrl + T ثم اضغط Brows، ثم اختر ملف الأداة، وبعد ذلك قم برسمها على الفورم ...
بعد إدراج الأداة في الفورم سنقوم بكتابة سطرين كود فقط، الأول يقوم بتمرير مسار ملف الـ skn إلى الخاصية Loadskin لكي تصبح جاهزة للاستخدام، والثاني يقوم باستخدامها فعلاً وتطبيقها على الفورم.

هدا هوا Code

عيوب الأداة:

كما هو الحال بالنسبة لأي أداة فإن لها إيجابياتها كما لها سلبياتها، ومن أهم العيوب التي وجدتها في هذه الأداة أنها لا تعترف بأداة العنوان الخاصة بالفيجول بيسيك Label وإنما لها أداة عنوان خاصة بها، ولا يمكنك التحكم في هذه الأداة كثيرا حيث لا يمكنك تغيير لونها ولا لون خلفيتها ولا الكثير من المميزات الأخرى التي تتميز بها أداة الفيجول بيسيك ...


ملفات الـ skn الجاهزة:

لقد أدرجنا في هذا الموضوع ملفات skn، وهي ملفات جاهزة قام بعض المصممين بعملها، ويمكنك عمل ملفات skn خاصة بك حسب ذوقك وتصميمك، وذلك عن طريق برنامج الـ 4.3 Active Skin نفسه

توزيع البرنامج:

كما تعلمون فإن أداة الـ Active Skin لا يتم توزيعها مع الفيجول بيسيك، ولذلك لابد أن نفترض أن المستخدم ليس لديه هذه الأداة لذلك قم بإرفاقها مع البرنامج وإما أن يتم نسخها على مجلد النظام بالويندوز System32 .. أو جعل هذه الأداة والملف التنفيذي في مجلد واحد ...

نسعد بتلقي أسئلتكم ومحاولة الإجابة عليها
مع خالص تمنياتنا بالتوفيق

وفي الأسفل تجد خيار Don’t Show this dialog in the future .. يمكنك أن تشير إليه لعدم ظهور هذه النافذة مرة أخرى .. والآن اختر Standard EXE من New , واضغط Open ..

1.3 : واجهة البرنامج الشاملة :

وهنا يجب تعريف أي متغير قبل استخدامه .. وإلا سوف يقوم البرنامج بإظهار رسالة خطأ كالتالي :

الكود:

(Compile Error: Variable Not Defined)

ونقوم بتعريف المتغير عن طريق الكود التالي :

الكود:

Dim (VarName) As (Type)

حيث أن VarName هو اسم المتغير .. و Type هو نوع البيانات التي ستخزن في المتغير .. أمثلة :

الكود:

Dim (VarName) As Variant
Dim (VarName) As Integer
Dim (VarName) As Long
Dim (VarName) As Byte
Dim (VarName) As Single
Dim (VarName) As Boolean
Dim (VarName) As String

ملحوظة هامة :

هناك بعض المبرمجين الذين يعرفون المتغير كما يلي :

الكود:

Dim A,B,C As Integer

حيث يريدون أن يقوموا بتعريف الثلاثة متغيرات كنوع Integer .. ولكن ما يحدث هو أن A و B يتم تعريفهم كنوع Variant .. وفقط C يتم تعريفه كنوع Integer .. فالطريقة الصحيحة للقيام بهذا الأمر هي :

الكود:

Dim A As Integer, B As Integer, C As Integer

4.3 : المزيد عن المتغيرات :

1. شروط كتابة اسم المتغير :

أولا : يجب أن يبدأ اسم المتغير بحرف وليس برقم .
ثانيا : يجب ألا يحتوي على رموز غربية مثل % $ # & .
ثالثا : يجب ألا يحتوي اسم المتغير على فراغ Space .
رابعا : يجب ألا يزيد اسم المتغير عن 255 حرفا .
خامسا : يجب ألا تكون كلمة مستخدمة في برمجة الفيجوال بيسك مثل End Print If Call ..

2. مدى المتغير :

تعريف المتغير من خلال نافذة General يضمن عمله في جميع أكواد النافذة Form .. ولكن لضمان عمله في جميع أكواد المشروع Project يجب إضافته لخاصية Module .. افتح قائمة Project واختر منها Add Module .. أو انقر بالزر الأيمن على المشروع في نافذة المستكشف واختر Add ثم Module ..



ثم تقوم بتعريف المتغير من خلال نافذة Module ..

الكود:

Dim (VarName) As (Type)

ويمكن أيضا تعريف المتغير بحيث يكون نطاق عمله هو الإجراء فقط Procedure .. مثل الزر أو مربع النص .. وهنا نقوم بكتابة التعريف داخل كود الزر أو مربع النص نفسه ..