Динамический TextBox не появляется на форме

@inetcoyote · Регистрация: 25.03.2013

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

Доброго времени стуток! Задача такая: на форме несколько textboxов и в цикле динамически созданному Textboxу прискаивать поочередно имена textboксов которые на формы и в них выводить информацию. Но почему то не работает вывод в textbox. Ошибок не выдает, а текст не выводится. Чего не хватает?

код кнопки :

VB.NET
1
2
3
4
5
6
7
Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
        Dim dinTB As New TextBox
        dinTB.Name = "TextBox1"
        dinTB.Visible = True
        dinTB.Text = "успешно"
        dinTB.Show()
End Sub

Здесь TextBox1 - textbox на форме, а dinTB - динамически созданный textbox текст

Памирыч · 24.11.2013, 23:49

Если это все, то попробуйте этот бокс поместить на форму не

VB.NET
1
DinTB.Show()

А

VB.NET
1
Me.Controls.Add(DinTB)

@ViterAlex · 25.11.2013, 08:06

Зачем создавать тестовое поле и давать ему имя уже существующего? Если нужно всего лишь вывести информацию, что делается об э одной строкой:

VB.NET
1
TextBox1.Text = "Текст"

Добавлено через 1 минуту

Сообщение от Памирыч

А

VB.NET
1
Me.Controls.Add(DinTB)

Выдаст ошибку, т.к. ТС присвоил имя контрола, который на форме уже есть

@inetcoyote · 25.11.2013, 12:11 **[ТС]**

Проблема заключается в следующем: имеется массив String с именами текстбоксов, например

VB.NET
1
2
Dim arrstr() as String = {"Textbox1","Textbox2","Textbox3"}
Dim arrtext() as String = {"Первый текстбокс","Второй текстбокс","Третий текстбокс"}

Текстбоксы с соответствующими именами имеются на форме, но не работает динамическое присваивание текста такому текстбоксу вида:

VB.NET
1
arrstr(0).Text = arrtext(0)

в итоге хотелось бы получить чтобы на фореме в TextBox1 вывелся текст из массива arrtext

поэтому я и пытался динамически создать ещё один текстбокс, который бы выполнял функции переносчика информации из массива в текстбоксы на форме

@Qwertiy · 25.11.2013, 13:15

Сообщение от inetcoyote

в итоге хотелось бы получить чтобы на фореме в TextBox1 вывелся текст из массива arrtext

Используй один из следующих вариантов:

VB.NET
1
2
Me.Controls.Add(YourTextBox)
YourTextBox.Parent = Me

@inetcoyote · 25.11.2013, 15:19 **[ТС]**

Qwertiy,

Эти команды создают новый TextBox, а мне нужно вывод текста именно в уже существующий на форме текстбокс

@Qwertiy · 25.11.2013, 15:22

Сообщение от inetcoyote

Эти команды создают новый TextBox

Неправда.

@inetcoyote · 25.11.2013, 15:27 **[ТС]**

Сообщение от Qwertiy

Неправда

Название: dinTextBox.png
Просмотров: 94

Размер: 5.0 Кб

неправда, а у меня появился новый текстбокс у углу формы

а тот который был так и остался без текста

Памирыч · 25.11.2013, 15:30

VB.NET
1
 Me.Controls(arrstr(1)).Text = arrtext(1)

@Qwertiy · 25.11.2013, 15:36

Сообщение от inetcoyote

Dim arrstr() as String = {"Textbox1","Textbox2","Textbox3"}

Раз они существуют, так и пиши

VB.NET
1
Dim arrstr() as Textbox = {Textbox1,Textbox2,Textbox3}

@inetcoyote · 25.11.2013, 16:26 **[ТС]**

Сообщение от Памирыч

Me.Controls(arrstr(1)).Text = arrtext(1)

спасибо, помогло!

и этот вариант тоже работает:

Сообщение от Qwertiy

Dim arrstr() as Textbox = {Textbox1,Textbox2,Textbox3}

@Qwertiy · 25.11.2013, 16:51

Сообщение от inetcoyote

неправда, а у меня появился новый текстбокс у углу формы

Новый создаётся командой New TextBox, которая у тебя где-то там стоит.
Приведённые мной команды помещают существующий TextBox на форму. Вероятно ты применяешь их к новому TextBox'у, созданному через New.

@inetcoyote · 19.12.2013, 17:11 **[ТС]**

Подскажите, а почему аналогичное динамическое создание как TextBox не работает на PictureBox ?

VB.NET
1
2
3
4
Dim dinTB As New PictureBox
Dim arrstr() As String = {"PB42"}
dinTB.Name = arrstr(0)
Me.Controls(arrstr(0)).BackColor = Color.Red

выдает ошибку : Object reference not set to an instance of an object.

@Qwertiy · 19.12.2013, 17:58

Сообщение от inetcoyote

Подскажите, а почему аналогичное динамическое создание как TextBox не работает на PictureBox ?

Всё работает. Ты его в контролы формы не добавляешь просто.

@inetcoyote · 19.12.2013, 18:21 **[ТС]**

Сообщение от Qwertiy

Всё работает. Ты его в контролы формы не добавляешь просто.

а как добавить? и если работает, то почему ошибка выдается?

@Qwertiy · 19.12.2013, 18:31

Сообщение от inetcoyote

а как добавить?

Либо Me.Controls.Add(Pct), либо Pct.Parent=Me.

Сообщение от inetcoyote

почему ошибка выдается?

Потому что Me.Controls(arrstr(0)) - это Nothing.

@inetcoyote · 20.12.2013, 11:02 **[ТС]**

Сообщение от Qwertiy

Либо Me.Controls.Add(Pct), либо Pct.Parent=Me

Название: dinPB.png
Просмотров: 54

Размер: 4.8 Кб

почему то если писать так то появляется новый picture box вместо закрашивания имеющегося на форме, а если в строке

VB.NET
1
Dim dinTB As New PictureBox

убрать слово new то вообще получается ошибка

@Qwertiy · 20.12.2013, 12:20

Перечитай-ка эту тему повнимательнее...

Новые блоги и статьи Все статьи Все блоги /
Конвертировать закладки radiotray-ng в m3u-плейлист damix 19.02.2026 Это можно сделать скриптом для PowerShell. Использование . \СonvertRadiotrayToM3U. ps1 <path_to_bookmarks. json> Рядом с файлом bookmarks. json появится файл bookmarks. m3u с результатом. # Check if. . .	Семь CDC на одном интерфейсе: 5 U[S]ARTов, 1 CAN и 1 SSI Eddy_Em 18.02.2026 Постепенно допиливаю свою "многоинтерфейсную плату". Выглядит вот так: https:/ / www. cyberforum. ru/ blog_attachment. php?attachmentid=11617&stc=1&d=1771445347 Основана на STM32F303RBT6. На борту пять. . .	Символьное дифференцирование igorrr37 13.02.2026 / * Программа принимает математическое выражение в виде строки и выдаёт его производную в виде строки и вычисляет значение производной при заданном х Логарифм записывается как: (x-2)log(x^2+2) -. . .	Камера Toupcam IUA500KMA Eddy_Em 12.02.2026 Т. к. у всяких "хикроботов" слишком уж мелкий пиксель, для подсмотра в ESPriF они вообще плохо годятся: уже 14 величину можно рассмотреть еле-еле лишь на экспозициях под 3 секунды (а то и больше),. . .
И ясному Солнцу zbw 12.02.2026 И ясному Солнцу, и светлой Луне. В мире покоя нет и люди не могут жить в тишине. А жить им немного лет.	«Знание-Сила» zbw 12.02.2026 «Знание-Сила» «Время-Деньги» «Деньги -Пуля»	SDL3 для Web (WebAssembly): Подключение Box2D v3, физика и отрисовка коллайдеров 8Observer8 12.02.2026 Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами и вызывать обработчики событий столкновения. . . .	SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL_LoadPNG (без SDL3_image) 8Observer8 11.02.2026 Содержание блога Библиотека SDL3 содержит встроенные инструменты для базовой работы с изображениями - без использования библиотеки SDL3_image. Пошагово создадим проект для загрузки изображения. . .

@inetcoyote 1 / 1 / 0 Регистрация: 25.03.2013 Сообщений: 129
	25.11.2013, 15:19 [ТС]
	Qwertiy, Эти команды создают новый TextBox, а мне нужно вывод текста именно в уже существующий на форме текстбокс 0

@Qwertiy 835 / 643 / 101 Регистрация: 20.08.2013 Сообщений: 2,524
	20.12.2013, 12:20
	Перечитай-ка эту тему повнимательнее... 0