CapsLock220 Ответов: 1

Vb: как я могу искать термины, определенные в richtextbox1, и печатать строки, содержащие эти термины из richtextbox2 в richtextbox3?


Всем Привет!

Полный нуб, пытающийся понять некоторые основные понятия.

Работа с VB в Visual Studio.

Как я могу искать термины, определенные в RichTextBox1, и печатать строки, содержащие эти термины из RichTextBox2 в RichTextBox3?

Что я уже пробовал:

Если RichTextBox1.Contains(RichTextBox2.Text) Затем

..- на самом деле это все, что я получил .

1 Ответов

Рейтинг:
0

Sandeep Mewara

Я бы посоветовал вам начать отсюда: Управления richtextbox.Найти Метод (System.Окна.Формы) | Microsoft Docs[^]

Ссылочный пример (не совсем то, что вам нужно, т. е. печать на строчную часть)

Public Function FindMyText(ByVal searchText As String, ByVal searchStart As Integer, ByVal searchEnd As Integer) As Integer
    ' Initialize the return value to false by default.
    Dim returnValue As Integer = -1

    ' Ensure that a search string and a valid starting point are specified.
    If searchText.Length > 0 And searchStart >= 0 Then
        ' Ensure that a valid ending value is provided.
        If searchEnd > searchStart Or searchEnd = -1 Then
            ' Obtain the location of the search string in richTextBox1.
        Dim indexToText As Integer = richTextBox1.Find(searchText, searchStart, searchEnd, RichTextBoxFinds.MatchCase)
            ' Determine whether the text was found in richTextBox1.
            If indexToText >= 0 Then
                ' Return the index to the specified search text.
                returnValue = indexToText
            End If
        End If
    End If

    Return returnValue
End Function

Попробуйте!