طريقة تطوير زر من خلال مربع تسمية ،
نعمل زر تسمية وليكن (lblButton3) ، بعد ذلك نقوم بعملية برزة اي جعلة بارز
وبعدين نقوم بتلون حسب الرغبة اي تقوم بتغيير الارقام الى اللون المفضل لديك مثلا (255) هو للون الاحمر او اللون الابيض مثل (16777215) وهذا رمز اللون الاسود (18241857) .
ومن ثم نجري الحدث عند الضغط على الماوس .
اقتباس'أما الشرط هذا فهو يجعل الزر غاطس (ويرمز لة بالرمز 2)Me.lblButton3.SpecialEffect = 2
'الشرط السفلي هو عبارة عن تغيير لون الخلفية عند الضغط على الماوس
Me.lblButton3.BackColor = 16777215
'الشرط الاخير هو تغيير لون الخط عند الضغط على الماوس
Me.lblButton3.ForeColor = 18241857
بهذة العملية يتم الضغط على الزر ولكن لايتم إرجاعة الى وضعة الطبيعي وهنا
نقوم بإجراء حدث عند رفع زر الماوس وليكن كما يلي :
اقتباس'من خلال الزر هذا يتم رفع الزر عند رفع الماوس (ويرمز لة بالرمز 1)Me.lblButton3.SpecialEffect = 1
'الشرط السفلي هو عبارة عن تغيير لون الخلفية عند رفع زر الماوس
Me.lblButton3.BackColor = 15987929
'الشرط السفلي هو عبرة عن تغيير لون الخط عند رفع زر الماوس
Me.lblButton3.ForeColor = 6697881
عسى ان أكون وفقت في الشرح ،
واليكم مثال على ذلك
ملف مرفق
مع خالص التحيات ،،،
عبدالمانع
