Обращение к программно созданным элементам. / Visual Basic

ReSQL.ru

Мобильная версия Контакт Правила FAQ Помощь

Гость

Войти | Регистрация | Профиль | Очистить

Новые сообщения | Избранное

Форумы | Пользователи | Статистика | Мод. лог | Поиск

Цитировать

Написать

Автор*:

Ввести пароль для входа

Тема*:

Сообщение

Данное сообщение тематическое

Сообщение содержит картинки или видео 18+

Автор:

ВНИМАНИЕ! На данном подфоруме действуют строгие правила. Удостоверьтесь, что ваше сообщение соответствует им!

Форум или тема закрыты для гостей. Необходима авторизация!

Загрузить последнюю сохраненную версию

Вложение:

Вставить как галерею

Максимальный размер вложений: 4,0 МБ, аудио/видео: 8,0 МБ. Картинки большего размера ужимаются, если возможно.

Введите код, изображенный на картинке. Если код нечитаемый, кликните картинку, чтобы загрузить другой вариант.

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

Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр

Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Обращение к программно созданным элементам.

3 сообщений из 3, страница 1 из 1

Обращение к программно созданным элементам.

#37220351

ДаркТМ

Гость

Программно создаю тексбоксы.

Код: plaintext

1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.

Private Sub Form_Load()
ots =  0 
For n =  0  To  99 
Form1.Controls.Add "Vb.Textbox", "Control" & Form1.Controls.Count
Form1.Controls(Form1.Controls.Count -  1 ).Left =  1500 
Form1.Controls(Form1.Controls.Count -  1 ).Top =  3500  + ots
Form1.Controls(Form1.Controls.Count -  1 ).Width =  1000 
Form1.Controls(Form1.Controls.Count -  1 ).Height =  300 
Form1.Controls(Form1.Controls.Count -  1 ).Visible = True
Form1.Controls(Form1.Controls.Count -  1 ).text = text(n)
ots = ots +  400 
Next n

Вопрос - как дальше к ним обращаться*?
То бишь пр форм лоаде они создаются, а надо, чтобы по нажатию кнопки оттуда вытаскивалась в программу инфа.
Может быть у них индекс свой создается... не могу понять...

...

Рейтинг:

0 / 0

17.04.2011, 14:31

| Ответить | Цитировать | Написать

Обращение к программно созданным элементам.

#37220370

Shocker.Pro

Участник

Откуда: ->|<- :адуктО

Сообщения: 23 134

Рейтинг: 0 / 0

1) по имени созданного контрола:

Код: plaintext

Form1.Controls("Control5").Visible = True

2) По заранее определенной объектной переменной (или массиву переменных, если хочется иметь индекс):

Код: plaintext

1.
2.

Dim MyTextBox As TextBox
Set MyTextBox = Form1.Controls.Add("Vb.Textbox", "Control5", Me)
MyTextBox.Visible = True

...

Рейтинг:

0 / 0

17.04.2011, 15:06

| Ответить | Цитировать | Написать

Обращение к программно созданным элементам.

#37220667

ДаркТМ

Гость

Благодарю.

...

Рейтинг:

0 / 0

17.04.2011, 20:27

| Ответить | Цитировать | Написать

3 сообщений из 3, страница 1 из 1

Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Обращение к программно созданным элементам.

Читали тему (0):

Читали форум (0):

Пользователи онлайн (0):

start [/forum/search_topic.php?author=%D0%BA%D0%B0%D0%BF%D0%B8%D1%82%D0%B0%D0%BD+%D0%B3%D0%B5%D0%BE%D1%80%D0%B3%D0%B8%D0%B9&author_mode=last_topics&do_search=1]:	0ms
get settings:	9ms
get forum list:	13ms
get settings:	10ms
get forum list:	15ms
check forum access:	3ms
check topic access:	3ms
track hit:	172ms
get topic data:	12ms
get forum data:	2ms
get page messages:	41ms
get tp. blocked users:	2ms
others:	716ms

total:	998ms