поиск !!!!!

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

поиск !!!!!

Сообщение Predator » 25.11.2003 (Вт) 11:33

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

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

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

Kostyan
Постоялец
Постоялец
 
Сообщения: 439
Зарегистрирован: 20.09.2002 (Пт) 4:14
Откуда: Россия, Уссурийск

Сообщение Kostyan » 25.11.2003 (Вт) 12:19

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

Predator
Обычный пользователь
Обычный пользователь
 
Сообщения: 74
Зарегистрирован: 10.12.2002 (Вт) 18:55
Откуда: Russia

Сообщение Predator » 25.11.2003 (Вт) 14:13

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

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

Kostyan
Постоялец
Постоялец
 
Сообщения: 439
Зарегистрирован: 20.09.2002 (Пт) 4:14
Откуда: Россия, Уссурийск

Сообщение Kostyan » 26.11.2003 (Ср) 4:41

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

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

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

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


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

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

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 8

    TopList  
cron