0

これまでのところ、テキスト全体の検索と置換をコーディングすることができました。

Private Sub btnFFindNext_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnFFindNext.Click

    Dim search As String
    Dim length As String

    search = textToFind.Text 
    length = textToFind.Text.Length

        lastposition = RichTextBox.Find(textToFind.Text, lastposition, RichTextBoxFinds.None)

    RichTextBox.SelectionStart = lastposition
    RichTextBox.SelectionLength = length
    lastposition = lastposition + 1

ただし、ユーザーがテキストを選択した場合に、その選択に対してのみ検索と置換が実行されるようにする必要があります。

どうすればいいですか？

4

1 に答える 1

0

< ricthTextBox.Find > を start と end の引数とともに使用できます (使用したものと同様)。
最初の開始点と終了点は、richTextBox のイベント (SelectionChanged) から取得できます。

どうなっているか教えて。

于 2012-11-14T12:34:44.413 に答える