سؤال ارجو الرد سريعا

[اسلام عمر 1]

المشاركة الأصلية كتبت بواسطة 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