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

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> ComboBox с дополнительным ListBox 
:(
    Опции темы
Izuver
Дата 6.11.2006, 00:28 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 352
Регистрация: 13.6.2006
Где: Омск

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



У меня есть список(столбец) с 8000 значениями, делать на такое кол-во ComboBox это безумие, поэтому я сделал список каждую отличающуюся. Получилось 450, выбирать из этого кол-ва надоело. Как создать что-то вреде меню пуск/Настройки, где в первом столбце скомпанованые первые буквы значений списка, во втором список заначеий на букву из первого столбика.
PM MAIL ICQ   Вверх
RockClimber
Дата 6.11.2006, 14:13 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 848
Регистрация: 5.5.2006
Где: планета 013 в тен туре

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



Первым пришло в голову что-то типа этого:
Код

'combobox1 - содержит все буквы, combobox2 - все слова на эту букву
'words(450) - текстовый массив со всеми значениями

Sub ComboBox1_Change()

Dim i As Long

ComboBox2.Clear

For i = 0 To 450
  If ComboBox1.Value = Left(words(i), 1) Then
    ComboBox2.AddItem (words(i))
  End If
Next i
End Sub


Но работоспособность я не проверял  smile 


--------------------
Хорошо кинутый дятел далеко летит, крепко встревает, долго торчит.
PM MAIL GTalk   Вверх
Izuver
Дата 6.11.2006, 21:54 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 352
Регистрация: 13.6.2006
Где: Омск

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



Хорошо это, но проблема у меня была в том как организовать это. При наводке мышью появляется второй ComboBox, а при выборе или смене значения из первого столбца исчезал.
PM MAIL ICQ   Вверх
Izuver
Дата 7.11.2006, 21:51 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 352
Регистрация: 13.6.2006
Где: Омск

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



Хотя можно что-то замутить с Visible, но как мне сделать такую вещь:
Первая сторчка у меня закреплена, следующая, видимая скажем 500-я. Так вот если мутить с Visible, то ComboBox появится на первой и до скажем 10-ой, но ни как на 500-ой.
PM MAIL ICQ   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Программирование, связанное с MS Office"
mihanik staruha

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

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

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



  • Несанкционированная реклама на форуме запрещена
  • Пожалуйста, давайте своим темам осмысленный, информативный заголовок. Вопль "Помогите!" таковым не является.
  • Чем полнее и яснее Вы изложите проблему, тем быстрее мы её решим.
  • Оставляйте свои записи в "Книге отзывов о работе администрации"
  • А вот тут лежит FAQ нашего подраздела


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

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


 




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


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

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