منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[سؤال] BackgroundImage تغيير لزر - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [سؤال] BackgroundImage تغيير لزر (/showthread.php?tid=37927)



BackgroundImage تغيير لزر - sayyad - 03-03-21

كيف أغير BackgroundImage لزر أثناء التشغيل


RE: BackgroundImage تغيير لزر - عبد الهادي بهاب - 03-03-21

لنفترض ان عندك صورتين في ملف الروسورس pic1 , pic2

 الان سنضع قيمة متغير بولين و لتكن مثلا صح 
 ثم لما نضغط على الزر تصبح القيمة خطا ويتغير خلفية الزر و لما نضغط ثانية تصبح القمة صح و تعود الصورة كما كانت

الكود كله

PHP كود :
Dim changBG As Boolean True

    Private Sub Button1_Click
(ByVal sender As System.ObjectByVal e As System.EventArgsHandles 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