Как сделать поиск по тексту

Программирование на Visual Basic, главный форум. Обсуждение тем программирования на VB 1—6.
Даже если вы плохо разбираетесь в VB и программировании вообще — тут вам помогут. В разумных пределах, конечно.
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
ilia_night
Новичок
Новичок
 
Сообщения: 32
Зарегистрирован: 14.01.2004 (Ср) 20:31
Откуда: Невинномысск

Как сделать поиск по тексту

Сообщение ilia_night » 14.01.2004 (Ср) 21:01

Я напечатал большой текст и засунул его в RichTextBox. Как сделать поиск по этому тексту?
Лень двигатель прогресса!!

gaidar
System Debugger
System Debugger
 
Сообщения: 3152
Зарегистрирован: 23.12.2001 (Вс) 13:22

Сообщение gaidar » 14.01.2004 (Ср) 21:53

Да хоть через InStr искать точку вхождения фрагмента. ;)
The difficult I’ll do right now. The impossible will take a little while. (c) US engineers in WWII
I don't always know what I'm talking about, but I know I'm right. (c) Muhammad Ali

RayShade
Scarmarked
Scarmarked
Аватара пользователя
 
Сообщения: 5511
Зарегистрирован: 02.12.2002 (Пн) 17:11
Откуда: Russia, Saint-Petersburg

Сообщение RayShade » 14.01.2004 (Ср) 23:01

Афтар не прав в корне! Надо было написать так "я напечатал большой кусок текста и сунул его себе как подпись, и вот теперь хочу в немнайти что то кроме слова "учиться" :lol:



А если честно, то поиск - через instr по проперти RTB.Text

Код: Выделить всё
RTB.selstart = instr(1, rtb.text, "mystr",,,vbtextcompare)

alibek
Большой Человек
Большой Человек
 
Сообщения: 14205
Зарегистрирован: 19.04.2002 (Пт) 11:40
Откуда: Russia

Сообщение alibek » 15.01.2004 (Чт) 10:12

Вообще-то у RTB есть метод .Find...
Lasciate ogni speranza, voi ch'entrate.

hCORe
VB - Экстремал
VB - Экстремал
Аватара пользователя
 
Сообщения: 2332
Зарегистрирован: 22.02.2003 (Сб) 15:21
Откуда: parent directory

Instr

Сообщение hCORe » 15.01.2004 (Чт) 15:13

Если юзать Find, то тогда после надо вызывать метод Span (для выделения результатов):

Код: Выделить всё
res=RichTextBox1.Find ("мой текст")
RichTextBox1.Span True, False


Мне лично все-таки больше InStr нравится :wink:
Моду создают модоки, а распространяют модозвоны.


Вернуться в Visual Basic 1–6

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

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

    TopList