Форум программистов, компьютерный форум, киберфорум
Наши страницы
Visual Basic
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.75/4: Рейтинг темы: голосов - 4, средняя оценка - 4.75
Lord1234
0 / 0 / 0
Регистрация: 05.11.2010
Сообщений: 7
1

Организация поиска в ListView

11.11.2010, 12:22. Просмотров 677. Ответов 2
Метки нет (Все метки)

Дан ListView, в нём 4 колонки. Нужно, вводя данные в ТехтВох осуществлять поиск по всему List'у, сравнивая TextBox и инфу из первого столбца. Вот мой вариант:
Visual Basic
1
2
3
4
5
6
7
8
9
10
11
'Found - искомая строка
'Item - содержание строки в первом столбце
  For i = 1 To Length
  Item = Form1.ListView1.ListItems(i)
   If InStr(Item, Found) <> 0 Then
    ListView1.ListItems(i).Selected = True
    ' Здесь идёт обработка выделенного фрагмента
    С = False
   Exit For
   EndIf
  Next
По-моему ошибка во 2-ой строке, т.к. пременной Item присваивается неправильное значение.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
11.11.2010, 12:22
Ответы с готовыми решениями:

Организация поиска из xl
Доброго всем вечера! подскажите что не так с кодом? не ищет данные в ячейке из текстового поля. ...

Организация поиска в базе .mdb.
sub poisk() dim db as database,tb as recordset set db=opendatabase('avto.mdb') set...

Организация меню пользователя
Подскажите плиз, может кто решал похожую проблему. В приложении определены пользователи и каждому...

Организация многозначных ветвлений
Работа светофора для водителя запрограммирована следующим образом: начиная с начала кадждого часа,...

Организация поиска в listview
Всем привет... вообщем как сделать поиск по списку listview? подскажите пожалуйста!

2
Messir
11.11.2010, 12:31 2
ой, не могу!
Ты бы для приличия посмотрел, какого типа элементы коллекции ListItems... Во-первых, это объекты, а посеу присвоение без Set'a дает автоматически ошибку, во-вторых, даже если set поставишь, то ошибка будет в третьей строчке, т.к. instr к объекту не применим...
XPraptor
0 / 0 / 3
Регистрация: 28.01.2010
Сообщений: 279
11.11.2010, 13:36 3
Visual Basic
1
2
3
4
5
6
7
8
9
Dim LI As ListItem
'Сначала ищем в первом столбце если не нашли то во всех остальных
'параметр lvwWhole точное совпадение
'параметр lvwPartial совпадение с любой частью
'пропущенный параметр индекс строки откуда начинать искать по умолчанию сначала
Set LI = Me.lvList.FindItem('что ищем', lvwText, , lvwWhole)
If LI Is Nothing Then
    Set LI = Me.lvList.FindItem('что ищем', lvwSubItem, , lvwPartial)
End If
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
11.11.2010, 13:36

Организация поиска в списке. Исправить ошибку в методе поиска
Сколько бы у меня желания не было, найти ее не могу. Может кто помочь? Заранее спасибо... #include...

Организация столбцов в ListView
Здравствуйте! Подскажите как сделать чтобы список авто выводился не в один столбик (как на рисунке)...

Организация хранения путей в ListView
Необходимо получить имена текстовых файлов и их содержимое поочередно. Скажем так, имеется каталог...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru