Обработка текстовых полей

Программирование на 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 :lol:

Firestorm
Постоялец
Постоялец
Аватара пользователя
 
Сообщения: 946
Зарегистрирован: 02.05.2002 (Чт) 14:36
Откуда: Russia

Сообщение Firestorm » 13.04.2003 (Вс) 19:55

...просто гламурный падонак...
_________________
reborn! v.2 :twisted:
_________________

RayShade
Scarmarked
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

Кто сейчас на конференции

Сейчас этот форум просматривают: Majestic-12 [Bot], PetalBot, Yandex-бот и гости: 3

    TopList