3- درس الالوان في فيجوال بيسك

المشرف العام

درس الالوان في فيجوال بيسك

يسطيع المبرمج اختيار الالوان التي تناسب ذوقه فيختارمايشاء من الالوان

فيحدد لون الخلفية ولون الخط ممايؤدي الي صفة ثبات الالوان ومثال ذلك

اذا اردنا تغيير لون الخلفية من الكود مثلا للفورم فاكتب مايلي:

form1.bakcolor=RGB(255,0,0)

فانت حددت قوة اللون بالرقم الاقصى له وهو 255

لاحظ ان كل حرف اجليزي يقابله خانة لكتابة الرقم فمثالنا السابق يختار اللون الاول الاحمر

وبقية الالوان قيمتها صفر

طبق المثال باختيار اللون الاخضر جرين وضع الرقم 255ف منتصف القوسين تاركا البقية اصفار

لاتنسى الفواصل فهي هامة جدا

form1.bakcolor=RGB(0,255,0)

ستكون الخلفية خظراء

مارايك عزيزي المبرمج ان نجعل مستخدم البرنامج يختار اللون الذي يناسبه عند عمله على برنامجك

اتبع الحطوات الاتية بدقة

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

اذهب لقائمة بروجكت واختارمكونات الخطوات بالانقلش كالتالي

project + components +++commondialog +++ ok

ثم اختار موافقcommondialog عند ظهور جدول الادوات او المكونات ضع صح امام (الاداة)

commondialog انت الان اضفت اداة جديدة لصندوق الادوات انظر اليها او مرر الماوس عليها لتلمح اسمها

الان انقر عليها مرتين لوضعها على الفورم ثم

ss من قائمة الخصائص سمها اسما محتصرا في خانة (نيم) وليكن مثلا

فقط غيرنا اسمها الان اضف زر امر للفورم

غير عنوان الزر من خاصية العنوان كابشن الي (الوان)

انقر مرتين على الزر الوان لكتابة الكود التالي

ss.showcolor
formm1.backcolor=ss.color

الان نفذ البرنامج اضغط على الزر الوان تظهر لك الوان مايكروسوفت وندز اختر مابناسبك منها

اليك الكود مع ملاحظة اسم الاداة والفورم

Private Sub Command1_Click()
ss.ShowColor
Form1.BackColor = ss.Color

End Sub

المشرف العام

حاووووووو كتيييييير

المشرف العام

حاووووووو كتيييييير