Программирование на Visual Basic, главный форум. Обсуждение тем программирования на VB 1—6.
Даже если вы плохо разбираетесь в VB и программировании вообще — тут вам помогут. В разумных пределах, конечно.
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут
закрыты.
Читайте
требования к создаваемым темам.
-
ZOD
-
- Обычный пользователь

-
-
- Сообщения: 75
- Зарегистрирован: 24.03.2004 (Ср) 19:54
- Откуда: Barnaul
ZOD » 24.03.2004 (Ср) 19:59
Подскажите, плиз. Нужно найти текст, например, "123" в 3-м столбце.
Заранее спасибо.
-
mad_Max
-
- Бывалый

-
-
- Сообщения: 203
- Зарегистрирован: 15.09.2002 (Вс) 21:17
- Откуда: Russia, Cherepovets
-
mad_Max » 24.03.2004 (Ср) 23:21
Ищет текст strText в колонке intColumn (нумерация с единицы) и выделяет найденный Item:
- Код: Выделить всё
Procedure FindString(strText as String, intColumn as Integer)
Dim i As Integer
For i = 1 To ListView.ListItems.Count
If ListView.ListItems(i).SubItems(intColumn - 1) = strText Then
ListView.ListItems(i).Selected = True
ListView.ListItems(i).EnsureVisible
Exit For
End If
Next i
End Sub
Соответственно FindString("123", 3) решает задачу.
Вернуться в Visual Basic 1–6
Кто сейчас на конференции
Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 11