Перенос выбранных строк из одного ListBox в другой

Программирование на Visual Basic for Applications
MiN
Начинающий
Начинающий
 
Сообщения: 2
Зарегистрирован: 20.04.2004 (Вт) 18:09

Перенос выбранных строк из одного ListBox в другой

Сообщение MiN » 20.04.2004 (Вт) 18:17

Помогите с программой. По ножатию кнопки, выделенные строки из одного ListBox переносятся в другой ListBox. А то чтото у меня не получается:

Код: Выделить всё
Private Sub CommandButton1_Click()
    For i = 1 To ListBox1.ListCount
        If ListBox1.Selected(i - 1) = True Then
            ListBox2.AddItem (ListBox1.ListIndex)
        End If
    Next
    ListBox1.RemoveItem (ListBox1.ListIndex)
End Sub

corgi
ToyMan
ToyMan
 
Сообщения: 1367
Зарегистрирован: 01.10.2002 (Вт) 9:59
Откуда: Россия, Москва

Сообщение corgi » 20.04.2004 (Вт) 18:31

это потому что надо так написать
ListBox2.AddItem (ListBox1.List(ListBox1.ListIndex)) :wink:
Ничто так не ограничивает полёт мысли программиста, как компилятор

MiN
Начинающий
Начинающий
 
Сообщения: 2
Зарегистрирован: 20.04.2004 (Вт) 18:09

Сообщение MiN » 21.04.2004 (Ср) 15:02

Спаибо! Помогло...

SUPchik
Обычный пользователь
Обычный пользователь
Аватара пользователя
 
Сообщения: 51
Зарегистрирован: 15.10.2008 (Ср) 21:46
Откуда: Луховицы

Re: Перенос выбранных строк из одного ListBox в другой

Сообщение SUPchik » 01.11.2010 (Пн) 20:51

а кто-нибудь подскажет решение,если в ListBox данные состоят из нескольких столбцов?
Нет ни одной надёжной системы безопасности!!!

Viper
Артефакт VBStreets
Артефакт VBStreets
Аватара пользователя
 
Сообщения: 4394
Зарегистрирован: 12.04.2005 (Вт) 17:50
Откуда: Н.Новгород

Re: Перенос выбранных строк из одного ListBox в другой

Сообщение Viper » 02.11.2010 (Вт) 5:57

SUPchik писал(а):а кто-нибудь подскажет решение,если в ListBox данные состоят из нескольких столбцов?
А в чем разница? Это, во-первых, а, во-вторых, ты на дату предыдущего поста смотрел?
Весь мир матрица, а мы в нем потоки байтов!


Вернуться в VBA

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

Сейчас этот форум просматривают: Google-бот и гости: 5

    TopList