| Вопрос: Новое сообщение без темы | Добавлено: 08.05.03 00:06 |
Автор вопроса:  Dimael | Web-сайт: pcnews.boom.ru | ICQ: 160511031 |
|
Допустм на форме около 20 текстовых элементов и мне нужно в Form_Load очистить содержимое этих элементов типа Text1.Text = "" Private Sub Form_Load() а как нить можно построить цикл чтобы он очистил все элементы типа For i=1 to 20 Txt(i).text="" Next i End Sub |
| Ответы | Всего ответов: 4 |
|
Номер ответа: 1 Автор ответа: Dimael ICQ: 160511031 Вопросов: 18 Ответов: 40 |
Web-сайт: Профиль | | #1 | Добавлено: 08.05.03 00:08 |
|
ОЙ про тему даже в спешке забыл!Простите! |
||
|
Номер ответа: 2 Автор ответа:  Артём Л. ICQ: 280044491 Вопросов: 43 Ответов: 227 |
Профиль | | #2 | Добавлено: 08.05.03 11:13 |
|
For i = 0 To frm.Controls.Count - 1 str = frm.Controls(i).Name if TypeName(frm.Controls(i))="TextBox" then frm.Controls(i).Text="" end if |
||
|
Номер ответа: 3 Автор ответа: DimaelICQ: 160511031 Вопросов: 18 Ответов: 40 |
Web-сайт: Профиль | | #3 | Добавлено: 08.05.03 12:55 |
|
Усё заработало Спасибо! Тока я так и не понял для чего было "str = frm.Controls(i).Name" |
||
|
Номер ответа: 4 Автор ответа:  Артём Л.ICQ: 280044491 Вопросов: 43 Ответов: 227 |
Профиль | | #4 | Добавлено: 08.05.03 17:17 | ||
|
сорри - я просто этот кусок со своего кода кинул и не очистил полностью от ненужных строк - эта строка лишняя! |
||||
Страница: 1 |