Программирование на Visual Basic, главный форум. Обсуждение тем программирования на VB 1—6.
Даже если вы плохо разбираетесь в VB и программировании вообще — тут вам помогут. В разумных пределах, конечно.
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут
закрыты.
Читайте
требования к создаваемым темам.
-
Mouse
-
- Начинающий

-
-
- Сообщения: 5
- Зарегистрирован: 13.04.2003 (Вс) 11:26
Mouse » 13.04.2003 (Вс) 13:50
Привет всем!
У меня в форме 20 текстовых полей, как мне быстро перебрать все поля формы и найти не пустые?
-
Gigahard
-
- Бывалый

-
-
- Сообщения: 253
- Зарегистрирован: 24.07.2002 (Ср) 11:15
- Откуда: Russia
Gigahard » 13.04.2003 (Вс) 14:04
Первое Сделай массив контролов
Второе Сделай цикл
- Код: Выделить всё
Dim i as integer
Dim result as String
result=""
For i=1 to 20
if len(txtBox(i).text)<>0 then ' Это для заполненых, =0 для пустых
result=result & txtBox(i).name
end if
next i
MsgBox result
-
Mouse
-
- Начинающий

-
-
- Сообщения: 5
- Зарегистрирован: 13.04.2003 (Вс) 11:26
Mouse » 13.04.2003 (Вс) 14:31
А как сделать массив контролов?
если я задаю в имени поля TextBox(1) - то ругается на имя текстового поля
-
Amed
-
- Алфизик

-
-
- Сообщения: 5346
- Зарегистрирован: 09.03.2003 (Вс) 9:26
-
Amed » 13.04.2003 (Вс) 19:20
Пиши имя контрола TextBox, а индекс задаётся в другом параметре - index

-
Firestorm
-
- Постоялец

-

-
- Сообщения: 946
- Зарегистрирован: 02.05.2002 (Чт) 14:36
- Откуда: Russia
-
Firestorm » 13.04.2003 (Вс) 19:55
...просто гламурный падонак...
_________________
reborn! v.2
_________________
-
RayShade
-
- Scarmarked

-

-
- Сообщения: 5511
- Зарегистрирован: 02.12.2002 (Пн) 17:11
- Откуда: Russia, Saint-Petersburg
-
RayShade » 14.04.2003 (Пн) 10:05
Не надо массивов!
Делаем так:
For each ctl in form.controls
if typeof ctl is textbox then result = result & iif(len(ctl.text)>0,ctl.name,"")
next ctl
И все дела.
-
Emzari
-
- Продвинутый пользователь

-
-
- Сообщения: 129
- Зарегистрирован: 06.09.2002 (Пт) 9:08
- Откуда: Georgia
Emzari » 14.04.2003 (Пн) 17:08
Создать массив из елементов управления очен просто с помощю копирования.
1) Создай один текст бокс
2) Потом выдели его и скопируи (Edit->Copy)
3) Потом ставиш (Edit->Paste)
При этом должен появится диалоговое окно в котором беисик спрашивает не хочем ли ми создать массив контроллов. Здес надо нажать на кнопке Yes.
повторяеш 3-й шаг столко раз сколко нужно. Получаеш массив.
Вернуться в Visual Basic 1–6
Кто сейчас на конференции
Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 3