Работа с элементами на UserControl добавленном динамически

@creatorsla · Регистрация: 16.06.2018

Студворк — интернет-сервис помощи студентам

Добрый день. Обычно нахожу ответы в поиске, но в этот раз не получается.
Есть форма, на которую я в зависимости от условий добавляю заранее подготовленные UserControl's - uc1, uc2,...
Например на одной форме одна кнопка, на другой две кнопки и т.д.

На форме есть элементы управления, которые будут менять надписи на кнопках размещенных на UserControl'ах.
Собственно вопрос, как к этим элементами обратиться без указания полного имени UserControl.

Если пишу код типа

VB.NET
1
uc1.Button1.Text = "0"

то все работает.

Но если пробую обратиться

VB.NET
1
Controls("uc" & u).button1.text = "0"

то появляется ошибка

BC30456 "button1" не является членом "Control"

Понимаю, что должно быть простое решение, но найти не могу.

@Orlangur · 14.10.2018, 00:28

creatorsla, Как соединить имя контрола и значение переменной

@creatorsla · 14.10.2018, 19:34 **[ТС]**

Спасибо.
С помощью With ничего не получилось. Упорно не хотел видеть кнопку.

VB.NET
1
2
3
        With CType(Me.GroupBox1.Controls("uc" & u), UserControl)
            .Button1.Text = "2"
        End With

Ошибка BC30456 "Button1" не является членом "UserControl".

Зато с Find заработало.

VB.NET
1
2
        Dim bt As Button = CType(Me.GroupBox1.Controls.Find("Button1", True)(0), Button)
        bt.Text = "2"

Правда сначала было коряво, т.к. я использовал команды Hide/Show

Кликните здесь для просмотра всего текста

VB.NET
1
2
3
        uc1.Hide()
        GroupBox1.Controls.Add(uc2)
        uc2.Show()

Оказалось, что в таком случае панели остаются и могут возникать ошибки, но после замены на remove все работает

VB.NET
1
2
        GroupBox1.Controls.Remove(uc1)
        GroupBox1.Controls.Add(uc2)

@Orlangur · 14.10.2018, 21:31

creatorsla, если usercontrol'ы - контейнеры, то тогда нужно опуститься чуть ниже, например

VB.NET
1
2
3
4
 Dim UsrBtn As Control.ControlCollection = CType(Me.GroupBox1.Controls("UserControl1" & 1), UserControl1).Controls
        For i = 0 To UsrBtn.Count - 1
            CType(UsrBtn("Button" & i), Button).Text = i
        Next

@creatorsla · 14.10.2018, 22:06 **[ТС]**

Спасибо. Получилось.
Правда, надо проверять наличие компонента в данном контейнере. Если Button1 есть в каждом, а CheckBox1 не в каждом, то код получился такой.

VB.NET
1
2
3
        Dim UsrBtn As Control.ControlCollection = CType(Me.GroupBox1.Controls("UserControl" & u), UserControl).Controls
        CType(UsrBtn("Button" & 1), Button).Text = 1
        If CType(UsrBtn("CheckBox" & 1), CheckBox) IsNot Nothing Then CType(UsrBtn("CheckBox" & 1), CheckBox).Text = 1

Новые блоги и статьи Все статьи Все блоги /
Перемещение выделенных строк ТЧ из одного документа в другой Maks 30.03.2026 Реализация из решения ниже выполнена на примере нетипового документа "ВыдачаОборудованияНаСпецтехнику" с единственной табличной частью "ОборудованиеИКомплектующие" разработанного в конфигурации КА2. . . .	Functional First Web Framework Suave DevAlt 30.03.2026 Sauve. IO Апнулись до NET10. Из зависимостей один пакет, работает одинаково хорошо как в режиме проекта так и в интерактивном режиме. из сложностей - чисто функциональный подход. Решил. . .	Автоматическое создание документа при проведении другого документа Maks 29.03.2026 Реализация из решения ниже выполнена на нетиповых документах, разработанных в конфигурации КА2. Есть нетиповой документ "ЗаявкаНаРемонтСпецтехники" и нетиповой документ "ПланированиеСпецтехники". В. . .	Настройка движения справочника по регистру сведений Maks 29.03.2026 Решение ниже реализовано на примере нетипового справочника "ТарифыМобильнойСвязи" разработанного в конфигурации КА2, с целью учета корпоративной мобильной связи в коммерческом предприятии. . . .
Автозаполнение реквизита при выборе элемента справочника Maks 27.03.2026 Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. При выборе "Спецтехники" (Тип Справочник. Спецтехника), заполняется. . .	Сумматор с применением элементов трёх состояний. Hrethgir 26.03.2026 Тут. https:/ / fips. ru/ EGD/ ab3c85c8-836d-4866-871b-c2f0c5d77fbc Первый документ красиво выглядит, но без схемы. Это конечно не даёт никаких плюсов автору, но тем не менее. . . всё может быть. . .	Автозаполнение реквизитов при создании документа Maks 26.03.2026 Программный код из решения ниже размещается в модуле объекта документа, в процедуре "ПриСозданииНаСервере". Алгоритм проверки заполнения реализован для исключения перезаписи значения реквизита,. . .	Команды формы и диалоговое окно Maks 26.03.2026 1. Команда формы "ЗаполнитьЗапчасти". Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. В качестве источника данных. . .

@Orlangur Лень — мое второе и 3228 / 2416 / 687 Регистрация: 28.11.2014 Сообщений: 3,601 Записей в блоге: 3
	14.10.2018, 00:28
	creatorsla, Как соединить имя контрола и значение переменной 1

Работа с элементами на UserControl добавленном динамически

Решение