• 
• 
• 

هاتف: +963-31-2220008
جوال: +963-999-824193
سوريا - حمص

النقاط الأساسية

• مقدمة
• تشغيل فيجوال بيسيك للتطبيقات
• تحميل مشروع موجود
• تنفيذ الماكروات في مشروع
• استعراض مكونات مشروع
• خاتمة

مقدمة

يعتبر أوتوكاد من أقوى برامج التصميم بالحاسوب (CAD) إن لم يكن أفضلها، وربما يعود ذلك إلى سهولة استخدامه وإمكانية التحكم به بلغات البرمجة.

كانت أوتوديسك تسوق أوتوكاد قبل الإصدارة 14 مع عدة بيئات للتطوير، ومنها نسخة خاصة من ليسب تدعى أوتوليسب (AutoLISP)، ما زالت توفرها في الإصدارات الجديدة من أوتوكاد.

تم إرفاق نسخة تجريبية من لغتي فيجوال بيسيك للتطبيقات (VBA) وفيجوال ليسب (Visual LISP) مع الإصدارة 14، ثم دُمجت هاتان البيئتان بشكل كامل في أوتوكاد 2000.

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

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

تشغيل فيجوال بيسيك للتطبيقات

ملاحظة: في الإصدارات الحديثة من أوتوكاد لا يتم تثبيت لغة VBA بشكل تلقائي معه، ويجب تحميلها من الموقع الرسمي للشركة، انقر هنا

يمكن تشغيل "محرر فيجوال بيسيك للتطبيقات" من قائمة أدوات (Tools > Macro > Visual Basic Editor)، أو بالضغط على مفتاحي Alt+F11، أو بكتابة الأمر vbaide في نافذة أوامر أوتوكاد، عندئذ تظهر النافذة المبينة في الشكل (1-1).

تحميل مشروع موجود

يمكن تحميل مشروع المثال المرفق مع الدرس بعد تنزيله على جهازك.
لتنزيل نسخة من المشروع انقر هنا.

في نافذة أوتوكاد اختر مدير فيجوال بيسيك للتطبيقات من قائمة أدوات (Tools > Macro > VBA Manager)، أو أكتب vbaman في نافذة أوامر أوتوكاد، فتظهر النافذة الموضحة في الشكل (1-2):

انقر الآن زر "تحميل" (Load)، يظهر صندوق حوار الملفات، اختر الملف الذي ترغب بتحميله (الملف ذي الامتداد DVB)، اختر acad-lesson01.dvb الملحق مع هذا الدرس، فيظهر اسمه في قائمة Project في النافذة السابقة.

ملاحظة: أحياناً تظهر رسالة تأكيد تحميل ملفات الماكرو، اختر منها Enable Macros.

اختر "إغلاق" (Close) لإغلاق النافذة.

تنفيذ الماكروات في مشروع

يمكنك بعد تحميل المشروع السابق تنفيذ الماكروات التي يحتويها كما يلي:

- اختر "ماكروات" من قائمة أدوات (Tools > Macro > Macros)، أو اضغط مفتاحي Alt+F8، أو اكتب vbarun، فتظهر النافذة الموضحة في الشكل (1-3). وهي قائمة بأسماء الماكروات واسم المشروع الذي يحتوي هذه الماكروات.

- اختر الماكرو الأول Macro1، ثم انقر على زر "تشغيل" (Run)، يقوم أوتوكاد بتنفيذ الماكرو، مع العلم أن وظيفته هي إظهار رسالة إلى المستخدم فقط.

- شغّل الماكرو الثاني Macro2 بذات الطريقة، فتظهر نافذة جديدة خاصة بالبرنامج، تبلغك بأن هذا عبارة عن مثال، قم بإغلاق النافذة.

استعراض مكونات مشروع

لاستعراض مكونات مشروع فيجوال بيسيك للتطبيقات اضغط مفتاحي ALT+F11. لاحظ أن النافذة اليسرى تسرد أسماء وأنواع مكونات المشروع السابق على شكل شجرة ويندوز، وهذه المكونات هي النموذج (أي صندوق الحوار) UserForm1، والوحدة النمطية (أي مجموعة الوظائف والإجرائيات) Module1، كما هو موضح في الشكل (1-4).

انقر الوحدة النمطية Module1 نقراً مزدوجاً، تظهر نافذة جديدة تبين محتويات هذه الوحدة النمطية كما في الشكل (1-5)، وهي في الحقيقة الماكروات التي استعرضناها سابقاً في نافذة الماكروات.

انقر النموذج UserForm1 نقراً مزدوجاً، تظهر نافذة جديدة، موضحة في الشكل (1-6)، تحتوي تصميم صندوق الحوار الذي ظهر عند تشغيل الماكرو الثاني.

خاتمة

تعلمت في هذا الدرس:

• تشغيل بيئة فيجوال بيسيك للتطبيقات.
• تحميل مشروع موجود.
• تنفيذ ماكرو.
• استعراض مكونات المشروع.

تحميل

• مشروع المثال