اقتباس:
المشاركة الأصلية كتبت بواسطة meesry
السؤال جاء فى محافظة المنوفية 2009 وهو من الفص الرابع
زر button1 لون خلفيته اخضر اكتب الكود الذى يجعل لونه يتغير بين الاخضر والاحمر كل 10 ثوانى تلقائيا وحدد فى اى حدث سوف يتم كتابة هذة الاوامر
السؤال غريب شوية وممكن يكون من جزء محذوف عموما ارجو الرد من المدرسين
|
حل السؤال كالتالي
يكتب الكود في الكائن Timer والحدث Tick كالتالي :
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
Timer1.enabled=true
Timer1.interval=10000
If Button1.BackColor = Color.Green Then
Button1.BackColor = Color.Red
Else
Button1.BackColor = Color.Green
End If
End Sub