الدرس الثالث التحكم فى الخصائص بإستخدام Visual Basic 2012

الدرس الثالث التحكم فى الخصائص بإستخدام Visual Basic 2012

3.1 خصائص عناصر التحكم

كافة عناصر التحكم في Visual Basic IDE 2012 لها خصائص. عن طريق تغيير الخصائص لعنصر  نحن قادرون على تخصيص مظهره وكيف يستجيب إلى حدث. أساسا، يمكنك تعيين خصائص عناصر التحكم في نافذة الخصائص في Visual Basic IDE 2012 في وقت التصميم أو في وقت التشغيل. الصورة التالية هى نافذة الخصائص النموذجية لنموذج. ويشير خاصة إلى واجهة التطبيق الأولى التي قمت بإنشائها في الدرس السابق.

في الإطار "خصائص"، يظهر العنصر في الجزء العلوي الكائن المحدد حاليا (في الشكل 3.1، الكائن المحدد هو Form1). في الجزء السفلي، تمثل البنود المدرجة في العمود الأيسر أسماء مختلف الخصائص المقترنة مع الكائن المحدد بينما تمثل البنود المدرجة في العمود الأيمن ولايات الخصائص. خصائص يمكن تعيين عن طريق تسليط الضوء على العناصر الموجودة في العمود الأيسر، ثم تغييرها عن طريق كتابة أو تحديد الخيارات المتاحة.

يمكنك أيضا تغيير الخصائص الأخرى لعنصر تحكم مثل اfont, location, size, foreground color, background color, MaximizeBox, MinimizeBox  وإلخ. يمكنك أيضا تغيير خصائص الكائن في وقت التشغيل لإعطاء تأثيرات خاصة مثل تغير اللون، الشكل، تأثير الحركة وهلم جرا.

3.1.1 تخصيص النموذج

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

وبالإضافة إلى ذلك، يمكننا تخصيص لون للنموذج. التعليمات البرمجية التالية سيتم تغيير لون النموذج الأصفر في كل مرة يتم تحميل النموذج. يستخدم Visual Basic 2012 RGB (الأحمر، الأخضر، الأزرق) لتحديد الألوان. هو رمز RGB للأصفر 255,255,0 بينما لي في المدونة تشير إلى النموذج الحالي وهو Backcolor خاصية لون الخلفية للنموذج. صيغة لتعيين لون RGB للنموذج هي Color.FormArbg (رمز RGB).  يتم إجراء الحدث كما يلي:

Public Class Form1 Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles 
 MyBase.Load
 Me.BackColor = Color.FromArgb(255, 0, 255)
End Sub
End Class

يمكنك أيضا استخدام الإجراء التالي لتعيين اللون في وقت التشغيل.

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Me.BackColor = Color.Magenta
End Sub

كل الإجراءات أعلاه سيتم تحميل النموذج مع خلفية أرجواني كما يلي:

 وفيما يلي بعض الألوان الشائعة ورموز RGB المطابق. يمكنك دائماً التجربة مع مجموعات أخرى، ولكن تذكر أن العدد الأقصى لكل لون هو 255 وهو الحد الأدنى لعدد 0.

التالي برنامج آخر الذي يسمح للمستخدم بإدخال رموز RGB في ثلاثة مربعات النص مختلفة، وعندما ينقر فوق الزر لون العرض، أنه أو أنها سوف تغير لون الخلفية للنموذج وفقا لرموز RGB. هذا البرنامج يسمح للمستخدمين بتغيير خصائص الألوان في النموذج في وقت التشغيل.

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim rgb1, rgb2, rgb3 As Integer
 rgb1 = TextBox1.Text
 rgb2 = TextBox2.Text
 rgb3 = TextBox3.Text
 Me.BackColor = Color.FromArgb(rgb1, rgb2, rgb3)
End Sub