بسم الله الرحمن الرحيم.السلام عليكم
ورحمة الله وبركاته .
النماذج Forms :
تعتبر النماذج أقرب أجزاء الأكسيس إلى الفيجوال بيسك - رغم
أنها لا تستخدم في الفيجوال - .
وسنقوم خلال الدروس بإنشاء نموذج قاعدة بيانات الأصدقاء
التي قمنا بإنشاءها
.بعد أن تقوم بفتح قاعدة البيانات اختر
نماذج - Forms وسيظهر لك أحد
الإختيارين التاليينانشاء
نموذج في طريقة عرض التصميم - Create form in Design view
انشاء نموذج باستخدام المعالج - Create
form by using wizerd
سنقوم مبدئياً بانشاء نموذج باستخدام
المعالج ... ولن يختلف الأمر في حالة القيام بذلك يدوياً ، اختر هذه
الطريقة وسيظهر لنا مربع حواري بالشكل التالي :
من الجزء الأعلى سوف نختار اسم الجدول
... سنختار جدولنا .
وفي الجزء الثاني سوف نختار الحقول التي نريد لها أن تظهر
في النموذج ... لذا قم باختيارها كلها ، واضغط التالي .
بعد ذلك سوف يعطينا أشكال مختلفة من عرض
النموذج ... سوف نختار الشكل الأول ثم نقوم بضغط التالي .
في الشاشة التالية سوف يعطينا تنسيقات مختلفة ... اختر
التنسيق الذي يروق لك .
[right]آخر الشاشات سوف يطلب منك اسم النموذج .
سنسميه Form1 ... الإختيارات
الموجودة بالأسفل واضحة وسنتركها على ما هي عليه .
ثم نضغط انهاء .
سوف يتكون لنا نموذج بالشكل التالي :
يمكنك التنقل بين السجلات واضافة وحذف
سجلات .
إذا كنت تريد التعديل في شكل النموذج اضغط على طرف شريط
الأدوات ، غير أماكن الأدوات كما يحلو لك ... وللعودة لوضع التنفيذ قم
بالضغط على نفس المكان ثانية بالشكل التالي :
قم الآن بعرض تصميم النموذج ... وسنقوم
بأول عملياتنا .
سنقوم بتحريك بعض الأدوات - مثل الفيجوال بيسك تماماً - ،
وسنغير مثلاً حجم حقل البريد وغيره .
لاحظ أنه لكي تحرك مربع نص TextBox دون تحريك مربع العنوان لا بد من
أن تسحب المربع من أعلى اليسار - سيصبح المؤشر على هيئة يد تؤشر بالسبابة -
بالشكل التالي :
لاحظ أيضاً أن الأدوات التي على اليسار شبيهه جداً بأدوات
الفيجوال بيسك في التعامل معها .
[right]سنبدأ في اضافة أزرار ... لسهولة
التعامل مع هذه الأزرار يفضل أن يكون زري السهم والمعالج مضغوطين وذلك
بالشكل التالي :
سنضغط عى صورة زر الأمر CommandButton . ثم نقوم برسمها على الفورم .
ستظهر لنا شاشة تطلب منا تحديد نوع العملية Categories والحدث Action ... في البداية سوف ننشأ زر خروج وستكون معلوماته
بالشكل التالي :
[right]نوع العملية : Application - تطبيق .
الحدث : إنهاء التطبيق - Quit
Application .
ثم نضغط التالي .
سيطلب منك تحديد الصورة أو النص الذي تريده أن يظهر ، اختر
ما يحلو لك ، ثم اضغط التالي .
في الشاشة الأخيرة سوف نقوم بتسمية زر الأمر ، سنسميه Cmd_Exit .
شغل الآن النموذج وقم بالضغط على الزر
... جرب تنفيذ الأمر .
الآن قم وبنفس الطريقة باضافة أزرار حتى يصبح النموذج
بالشكل التالي .
لتغيير تنسيقات وخصائص مكونات النموذج
بعد الضغط على خصائص أي شي في الفورم من زر الماوس الأيسر ستظهر شاشة
بالشكل التالي :
غير أي خاصية تريد تغييرها ولاحظ
النتيجة .
أيضاً سنقوم باضافة زر خاص يحتوي على
رسالة تظهر مؤلف البرنامج ، لذا أزل التأشير من على علامة المعالج ، واختر
زر أمر وقم برسمه على الفورم ... اضغط عليه واكتب نص مثلاً About .
اضغط الآن زر الماوس الأيسر واختر (
بناء حدث -
build events ) - ثم اختر من مربع
الحوار ( code
builder ) .ستظهر لنا شاشة مثل شاشة
كود الفيجوال بيسك ، وسوف نكتب فيها الأمر التالي :
MsgBox "Programming By : Ahmed Gamal", vbInformation,
"About"
تماماً مثل كود الفيجوال بيسك وذلك
بالشكل التالي :
الآن اغلق محرر فيجوال بيسك وجرب زر
الأمر الجديد .
سنقوم الآن باضافة مربع نص يضع الوقت
فيه بمجرد الضغط عليه ... لذا سنرسم مربع نص ثم نقوم بنفس الطريقة السابقة
بتشغيل محرر فيجوال بيسك ، ثم نكتب الأمر التالي في حدث Click .
Text30.Text
= DateTime.Timeآمل أن يتكون لديك نموذج قريب من هذا
الشكل :
والملف الآن بعد هذه التعديلات في الاسفل.
والله الموفق ...تحياتي : TheStarوالسلام عليكم ورحمة الله وبركاته .