Модераторы: Akina
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Имена элементов формы в циклах 
:(
    Опции темы
VirusE
Дата 26.5.2005, 09:48 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 29
Регистрация: 9.12.2004

Репутация: нет
Всего: нет



Есть несколько групп элементов, имена их отличаются последней цифрой
например:
группа i
ai, bi, ci
группа 2
aj, bj, cj
группа 3
ak, bk, ck
в реале количество групп и их состав больше (8 групп по 16 элементов).
данные от элементов формы нужно занести в таблицу
можно ли задать цикл
например:

from x=1 to k
cells(n,(c*(x-1)+1)=ax
cells(n,(c*(x-1)+2)=bx
cells(n,(c*(x-1)+3)=cx
next

в принципе загвоздка состоит в том, как задать имя элемента формы в цикле
в каждом цикле текстовая часть постоянна, а цифра меняется.
PM MAIL   Вверх
ChofCh
Дата 26.5.2005, 10:10 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 47
Регистрация: 27.4.2005
Где: г. Долгопрудный

Репутация: нет
Всего: 2



Есть такая полезная вещь, как массив элементов управления. Бросаешь на форму, к примеру, текстовое поле Text1, и потом приписываешь ему какое-нибудь свойство Index. IDE автоматически предлагает создать массив эл. управления, если скопировать контрол, а потом вставить его на ту же форму.
PM MAIL ICQ   Вверх
Akina
Дата 26.5.2005, 10:18 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Советчик
****


Профиль
Группа: Модератор
Сообщений: 20581
Регистрация: 8.4.2004
Где: Зеленоград

Репутация: 34
Всего: 454



Цитата(ChofCh @ 26.5.2005, 11:10)
и потом приписываешь ему какое-нибудь свойство Index

У контрола есть свойство "Index" изначально. Просто оно не имеет значения по причине отсутствия управляющего массива. Если ему вручную задать значение (скажем ноль) - IDE тут же предложит создать управляющий массив.

Примечания:
1) Управляющий массив - всегда одномерный. При наличии нескольких групп контролов у каждой группы будет свой массив.
2) Значения его - динамические, начиная с нуля.
3) Созданный для контрола управляющий массив удалить нельзя - придется удалить все контролы этого массива и создать их заново.


--------------------
 О(б)суждение моих действий - в соответствующей теме, пожалуйста. Или в РМ. И высшая инстанция - Администрация форума.

PM MAIL WWW ICQ Jabber   Вверх
Naghual
Дата 26.5.2005, 10:19 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1893
Регистрация: 15.5.2004
Где: Украина, Днепр

Репутация: 26
Всего: 49



Цитата
cells(n,(c*(x-1)+1)=ax
Так ты это про эксель?
Тогда как понимать фразу
Цитата
имя элемента формы
?

Поясни


--------------------
Я желаю всем Счастья!
PM ICQ Skype   Вверх
VirusE
Дата 26.5.2005, 11:00 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 29
Регистрация: 9.12.2004

Репутация: нет
Всего: нет



в редакторе создается форма, которая в экселе появляется при нажатии соответствующей клавиши
в форму введены элементы: Рage, Lable, TextBoxs, ComboBox и тп.
каждый элемент имеет свое имя (по умолчанию название элемента и номер),
у меня несколько идеентичных Page (вкладка) их названия отличаются (Caption), а имена (name) отличаются лишь номером, на каждой странице одинаковый набор элементов, отличие имен в цифре в конце
например

Page_1(name), Даты 1(cafption) - page
на вкладке
data_a_1(name) - TextBox
data_b_1(name) - TextBox
data_c_1(name) - TextBox
data_d_1(name) - TextBox
nal_1(name) - CheckBox

Page_2(name), Даты 2(cafption) - page
на вкладке
data_a_2(name) - TextBox
data_b_2(name) - TextBox
data_c_2(name) - TextBox
data_d_2(name) - TextBox
nal_2(name) - CheckBox

и так далее
Добавлено @ 11:06
ai,bi,.....ck - значения элементов
например a1=data_a_1.Value
PM MAIL   Вверх
Naghual
Дата 26.5.2005, 11:29 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1893
Регистрация: 15.5.2004
Где: Украина, Днепр

Репутация: 26
Всего: 49



Тогда тебе таки проще будет переделать все под массив элементов и обращатся к ним через индексы.


--------------------
Я желаю всем Счастья!
PM ICQ Skype   Вверх
VirusE
Дата 26.5.2005, 12:00 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 29
Регистрация: 9.12.2004

Репутация: нет
Всего: нет



да ладно уже все сделал, только макрос длиннющий получился (хотел сократить за счет цикла), а пределывать времени нет
PM MAIL   Вверх
Mephisto
Дата 27.5.2005, 06:17 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Волкъ
***


Профиль
Группа: Завсегдатай
Сообщений: 1818
Регистрация: 27.8.2003
Где: Питер

Репутация: 2
Всего: 34



Вот прикольный примерчик, можешь пограть с ним.
Есть еще прикольная функция TypeOf
Код
    If TypeOf MyControl Is CheckBox Then

Вот соб-сна пример:
Код
    Dim TT as Control

    For Each TT in Controls
        TT.Visible=False
    Next

smile smile smile

Это сообщение отредактировал(а) Mephisto - 27.5.2005, 06:18
PM   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "VB6"
Akina

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по VB обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • Используйте теги [code=vb][/code] для подсветки кода. Используйтe чекбокс "транслит" (возле кнопок кодов) если у Вас нет русских шрифтов.


Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Akina.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | VB6 | Следующая тема »


 




[ Время генерации скрипта: 0.0773 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.