03-03-21, 12:14 AM
03-03-21, 01:50 AM
لنفترض ان عندك صورتين في ملف الروسورس pic1 , pic2
الان سنضع قيمة متغير بولين و لتكن مثلا صح
ثم لما نضغط على الزر تصبح القيمة خطا ويتغير خلفية الزر و لما نضغط ثانية تصبح القمة صح و تعود الصورة كما كانت
الكود كله
الان سنضع قيمة متغير بولين و لتكن مثلا صح
ثم لما نضغط على الزر تصبح القيمة خطا ويتغير خلفية الزر و لما نضغط ثانية تصبح القمة صح و تعود الصورة كما كانت
الكود كله
PHP كود :
Dim changBG As Boolean = True
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If changBG = True Then
Button1.BackgroundImage = My.Resources.pic2
changBG = False
ElseIf changBG = False Then
Button1.BackgroundImage = My.Resources.pic1
changBG = True
End If
End Sub