[asmarsou]

(01-05-22, 04:08 AM)nabil.1710 كتب :

(26-04-22, 10:57 PM)asmarsou كتب :

(26-04-22, 08:22 PM)nabil.1710 كتب : السلام عليكم اخواني .

هل من الممكن تغير لون خلفية جميع الازرار الموجودة على FORM بكود واحد .

انا استخدم هذا الكود لتغير لون كل زر منفصل .

  Button7.BackColor = Color.LightSteelBlue
        Button11.BackColor = Color.LightSteelBlue
        Button15.BackColor = Color.LightSteelBlue
       Button19.BackColor = Color.LightSteelBlue
       Button23.BackColor = Color.LightSteelBlue
      Button25.BackColor = Color.LightSteelBlue
        Button26.BackColor = Color.LightSteelBlue
   
فهل تغير الون لجميع Button على FORM بكود واحد

و شكرا

 و عليكم السلام و رحمة الله و بركاته
استعمل الكود التالي في حدث form on load  او زر منفصل

كود :

For Each ctl As Control In Me.Controls
           If TypeOf ctl Is Button Then
               ctl.BackColor = Color.LightSteelBlue
           End If
       Next

جزاك الله خيرا يعمل جيدا .
فضلا منك اريد ايضا ان استخدم كود كهذا لتغير لون جميع الازرار فى جميع فورم البرنامج حيث 12 فورم * 6 ازرار .
وشكرا

 لك ذلك ... فقط ا ضف مؤقت على ان يكون مفعلا ثم ضع به الكود التالي ليصبح هكذا

كود :

Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
       For Each F As Form In Application.OpenForms
           For Each ctl As Control In F.Controls
               If TypeOf ctl Is Button Then
                   ctl.BackColor = Color.LightSteelBlue
               End If
           Next
       Next
   End Sub