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

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Управление списком ListBox + ListBox, Перемещение значения из списка ListBox  
:(
    Опции темы
plansis
  Дата 11.1.2010, 17:04 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



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

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



Не пойму как реализовать управления списком listBox 

перемещения из списка в список ( одного значения или всего списка ) 


user posted image

Это сообщение отредактировал(а) plansis - 11.1.2010, 17:22

Присоединённый файл ( Кол-во скачиваний: 3 )
Присоединённый файл  ______.rar 16,99 Kb
PM MAIL   Вверх
Akina
Дата 11.1.2010, 17:53 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


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


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

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



Вот код, перекидывающий строки из Список0 в Список2 и обратно по двойному клику. Остальное домысли сам.
Код

Private Sub Список0_DblClick(Cancel As Integer)
Список2.AddItem Список0.ItemData(Список0.ListIndex)
Список0.RemoveItem Список0.ListIndex
End Sub

Private Sub Список2_DblClick(Cancel As Integer)
Список0.AddItem Список2.ItemData(Список2.ListIndex)
Список2.RemoveItem Список2.ListIndex
End Sub



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

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


Новичок



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

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



Цитата(Akina @ 11.1.2010,  17:53)
Вот код, перекидывающий строки из Список0 в Список2 и обратно по двойному клику. Остальное домысли сам.
Код

Private Sub Список0_DblClick(Cancel As Integer)
Список2.AddItem Список0.ItemData(Список0.ListIndex)
Список0.RemoveItem Список0.ListIndex
End Sub

Private Sub Список2_DblClick(Cancel As Integer)
Список0.AddItem Список2.ItemData(Список2.ListIndex)
Список2.RemoveItem Список2.ListIndex
End Sub

кручу пример всяко разно ( но у меня выскакивает ошибка построения кода ) - не пойму что не так 

Private Sub Список0_DblClick(Cancel As Integer)
Список2.AddItem Список0.ItemData(Список0.ListIndex)
Список0.RemoveItem Список0.ListIndex
End Sub
PM MAIL   Вверх
Akina
Дата 14.1.2010, 14:43 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


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


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

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



Цитата(plansis @  14.1.2010,  15:22 Найти цитируемый пост)
 у меня выскакивает ошибка построения кода 

Телепатов тут нет. Выскакивает ошибка - цитируй всё что написано или выкладывай скриншот.
Прикладываю БД. Разбирайся.

Присоединённый файл ( Кол-во скачиваний: 8 )
Присоединённый файл  db1.zip 10,11 Kb


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

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


Новичок



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

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



Благодарствую товарищ ! 

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

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

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

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


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

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


 




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


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

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