EditPoint.ReplacePattern(TextPoint, String, String, Int32, TextRanges) Methode
Definition
Wichtig
Einige Informationen beziehen sich auf Vorabversionen, die vor dem Release ggf. grundlegend überarbeitet werden. Microsoft übernimmt hinsichtlich der hier bereitgestellten Informationen keine Gewährleistungen, seien sie ausdrücklich oder konkludent.
Sucht ein Muster im angegebenen Textbereich und ersetzt dieses durch den angegebenen Text.
[System.Runtime.InteropServices.DispId(152)]
public bool ReplacePattern (EnvDTE.TextPoint Point, string Pattern, string Replace, int vsFindOptionsValue = 0, out EnvDTE.TextRanges Tags = default);
[<System.Runtime.InteropServices.DispId(152)>]
abstract member ReplacePattern : EnvDTE.TextPoint * string * string * int * TextRanges -> bool
Public Function ReplacePattern (Point As TextPoint, Pattern As String, Replace As String, Optional vsFindOptionsValue As Integer = 0, Optional ByRef Tags As TextRanges = Nothing) As Boolean
Parameter
- Point
- TextPoint
Erforderlich. Der Endpunkt des angegebenen Textbereichs. Der Bearbeitungs Punkt und Punkt sind die Begrenzungen für die Ersetzung.
- Pattern
- String
Erforderlich. Die zu suchende Zeichenfolge.
- Replace
- String
Erforderlich. Die Ersetzungs Zeichenfolge für das Muster.
- vsFindOptionsValue
- Int32
(Optional) Eine vsFindOptions-Konstante, die den Typ der auszuführenden Suche angibt.
- Tags
- TextRanges
(Optional) Wenn das übereinstimmende Muster ein regulärer Ausdruck ist, der markierte unter Ausdrücke enthält, enthält Tags eine Auflistung von- TextRange Objekten, eine für jeden markierten Teil Ausdruck.
Gibt zurück
true, wenn die Ersetzung erfolgreich ist; andernfalls false.
- Attribute
Beispiele
Sub ReplacePatternExample()
Dim objTextDoc As TextDocument
Dim objMovePt As EditPoint
Dim objEditPt As EditPoint, iCtr As Integer
' Create a new text file.
DTE.ItemOperations.NewFile("General\Text File")
' Get a handle to the new document and create an EditPoint.
objTextDoc = DTE.ActiveDocument.Object("TextDocument")
objMovePt = objTextDoc.EndPoint.CreateEditPoint
objEditPt = objTextDoc.StartPoint.CreateEditPoint
' Insert ten lines of text.
For iCtr = 1 To 10
objEditPt.Insert("This is a test." & Chr(13))
Next iCtr
objEditPt.StartOfDocument()
objMovePt.EndOfDocument()
' Replace all occurrences of "test" with "thing."
objEditPt.ReplacePattern(objMovePt, "test", "thing", vsFindOptions.vsFindOptionsFromStart)
End Sub
Hinweise
ReplacePattern sucht Text ähnlich wie FindPattern , mit der Ausnahme, dass er nur den Text zwischen dem Bearbeitungs Punkt und dem-Argument durchsucht Point . Verwenden Sie, um im gesamten Dokument zu suchen und zu ersetzen ReplacePattern . Die Auflistung Tags gibt nur Informationen für das letzte übereinstimmende Muster zurück.