Форум программистов, компьютерный форум, киберфорум
Visual Basic .NET
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.67/3: Рейтинг темы: голосов - 3, средняя оценка - 4.67
76 / 37 / 2
Регистрация: 07.01.2012
Сообщений: 414
1

Поиск в RTB всех значений, а не только первого

15.08.2012, 14:26. Показов 528. Ответов 2
Метки нет (Все метки)

Делаю поиск таким методом:

VB.NET
1
Form1.rtbEdit.Find(Me.TextBox1.Text)
Но находит он всего первое совпадение и всё!
Как сделать кнопки что бы можно было листать совпадения (вперёд - назад)?
0

Помощь в написании контрольных, курсовых и дипломных работ здесь.

Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
15.08.2012, 14:26
Ответы с готовыми решениями:

Создать новый стек, содержащий только те числа из первого стека, которые больше среднего значения всех элементов первого
Общая часть: Создать стек для хранения чисел, значение которых случайно в диапазоне от –50 до +50....

Занесение в массив значений с первого столбца всех листов
Здравствуйте! Необходимо в общий массив massiv занести строки со значениями со всех перечисленных...

Поиск первого и последнего значений в столбце таблицы
Пошу помочь с задачей для VBA. Есть таблица с тремя колонками с указанным диапазоном TABLE_1. В...

Поиск в RTB и подсветка найденного
подскажите как организовать поиск подстрок с выделением в richBox т. е. в данном тексте выделить...

2
43 / 43 / 4
Регистрация: 30.04.2011
Сообщений: 276
15.08.2012, 18:21 2
Как-то так:
VB.NET
1
2
3
4
5
Dim i as integer = 0 'индекс символа, от которого начинаем поиск
i = Find(Me.TextBox1.Text, i, richtextboxfinds.none) 'присваиваем переменной i индекс начала найденного текста
if i <> -1 then
i+=Me.TextBox1.Text.length + 1 'при следующем поиске текст будет искаться начиная с символа i
end if
1
Почетный модератор
21307 / 9041 / 1081
Регистрация: 11.04.2010
Сообщений: 11,015
15.08.2012, 18:54 3
А вот он код Dim1One-а, только добавлена закраска
VB.NET
1
2
3
4
5
6
7
8
9
10
        Dim Sstr As String = "As"
        Dim I As Integer = 0
        Do
            I = RichTextBox1.Find(Sstr, I, RichTextBoxFinds.None)
            If I < 0 Then Exit Do
            RichTextBox1.SelectionStart = I
            RichTextBox1.SelectionLength = Sstr.Length
            RichTextBox1.SelectionColor = Color.Red
            I += 1
        Loop
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
15.08.2012, 18:54

Поиск всех значений в БД
Здравствуйте. Проблема такая: когда я ищу что-либо в свой БД, то у меня находит только одно...

поиск только нулевых значений
Здравствуйте. Есть столбец с числовыми значениями. Выделяю диапазон ячеек в этом столбце, и пытаюсь...

Определить наименьшее из всех значений элементов первого столбца матрицы и вывести его на экран
Решите пожалуйста задачу. Задан двумерный массив М(N, M). Определить наименьшее из всех значений...

Поиск схожих значений в двух столбцах и перенос из первого на другой лист
Добрый вечер! Идея такая! Есть Два столбца, Один большой, второй меньше, нужно найти значения из...


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

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

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