.NET 4.x Изменение всех label на форме - Visual Basic .NET
Формулировка задачи:
Здравствуйте, знатоки! Такой вопрос - Как сделать изменение цвета ВСЕХ label на форме. Т.е я имею 37 label на одной форме, и как мне сменить цвет сразу всех, а не по одной. Вот такой код имею:
Листинг программы
- If Me.BackColor = Color.Black Then
- 'тут должна быть смена всех цветов label на белый
- Else
- 'на чёрный
- End If
Цвет текста изменить надо (forecolor)
Решение задачи: «.NET 4.x Изменение всех label на форме»
textual
Листинг программы
- Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
- Dim frm As New Form2
- frm.Show()
- For Each f As Form In Application.OpenForms
- Update(f)
- Next
- End Sub
- Private Overloads Sub Update(ByVal ctrl As Control)
- For Each c As Control In ctrl.Controls
- If TypeOf c Is Label Then
- c.BackColor = Color.LightGreen
- End If
- Update(c)
- Next
- End Sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д