到目前为止,我已经能够为整个文本执行代码查找和替换。
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
但是,我现在需要使其成为可能,以便在用户选择某些文本时,只对该选择执行查找和替换。
我该怎么做?
答案 0 :(得分:0)
您可以使用< ricthTextBox.Find>带有开始和结束的参数(类似于你使用的) 您可以从richTextBox的事件(SelectionChanged)
中获取第一个起点和终点告诉我怎么回事。