Как сделать группу контролов членами коллекции другого контрола? - Visual Basic .NET

Узнай цену своей работы

Формулировка задачи:

Всем здравствуйте. На форме есть группа Label с различными именами и PictureBox. Задача сделать все Label членами коллекции PictureВox. Если сделать так, то всё работает как надо
Но это громоздко. А вот если сделать так, то часть меток не становится членами коллекции PictureBox. Почему?
SetParent.rar

Решение задачи: «Как сделать группу контролов членами коллекции другого контрола?»

textual
Листинг программы
        Dim LabList As New List(Of Label)   ' список Label формы
        For Each lbl As Control In Me.Controls
            If TypeOf lbl Is Label Then LabList.Add(CType(lbl, Label))
        Next
 
        LabList.ForEach(Sub(L As Label) L.Parent = PictureBox1)
 
        For Each lbl As Control In PictureBox1.Controls
            If TypeOf lbl Is Label Then
                lbl.BackColor = Color.Green
            End If
        Next

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

7   голосов , оценка 3.714 из 5
Похожие ответы