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

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Элемент массива = флажок, Где ошибка в коде? 
V
    Опции темы
SantMat
  Дата 18.1.2010, 00:07 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



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

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



Здравствуйте дорогие форумчане!
Не могу реализовать в Access форме отбор по флажкам. В общем, есть форма, в которой много флажков (если точно, 31, организованных поодиночке, т.е. выбраны могут быть все). Нужно по клику на кнопке отследить, какие флажки включены (On, т.е. True) и создать текстовую строку с их именами через запятую (в дальнейшем нужно для отбора по таблице через запрос).
Вот кусок кода (флажки в форме с именами Monday, Tuesday и т.д.):
Код

Private Sub Кнопка_Click()
Dim I As Integer, Day, DayT
Day = Array("Monday", "Tuesday", "Wednesday", "Thursday", "Friday", "Saturday", "Sunday")
For I = 0 To 5
    If Day(I).Value = True Then
        DayT = DayT & "," & Day(I)
    End If
Next I
MsgBox (DayT)
End Sub

Выдаёт ошибку: Run-time error 424: "Object required", указывая на If Day(I).Value = True Then
Как преобразовать элемент массива в CheckBox, т.е. в флажок, чтобы код VB заработал?

--
заранее благодарен...
PM MAIL   Вверх
Akina
Дата 18.1.2010, 08:43 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


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


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

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



Код

If Me.Controls(Day(I)).Value = True Then



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

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


Новичок



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

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



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

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

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

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


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

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


 




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


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

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