поиск !!!!!

[Predator]

есть необходимость осуществить поиск по тексту

по введенному слову или фразе осушествляется поиск по тексту и пользователю выводится информация в каких разделах это слово встречается с последующей возможностью перехода в один из разделов....

всем откликнувшимся зарание благодарен...

[Kostyan]

Позиция (n), с которой начинается искомый текст: n = Instr(где ищем, что ищем)
Для поиска следующей позиции: n=Instr(n+1,где ищем, что ищем)
В текстбоксе переход в нужную позицию:
Text1.SelStart = n
Text1.SetFocus

[Predator]

немного непонятно

поясни или есть скинь пример программки

[Kostyan]

Функция Instr ищет в заданном тексте позицию, с которой начинается искомый тест.

Пример:
Нужно найти с какой позиции начинается слово "Basic" в фразе "Я изучаю Basic"

делаем так:
n = Instr(0, "Я изучаю Basic", "Basic") '0 - это позиция с которой нужно начинать поиск, т.е. с самого начала
n будет равно 10

Чтобы узнать, есть ли в данной фразе ещё слово Basic:
n = Instr(n+1, "Я изучаю Basic", "Basic")
здесь я указал первым параметром n+1
функция вернет 0, т.к. слово больше не встречается.