Sdílet prostřednictvím


EditPoint2.ReplacePattern – metoda (TextPoint, String, String, Int32, TextRanges%)

Vyhledá vzorek v určeném rozsahu textu a nahradí určený text.

Obor názvů:  EnvDTE80
Sestavení:  EnvDTE80 (v EnvDTE80.dll)

Syntaxe

'Deklarace
Function ReplacePattern ( _
    Point As TextPoint, _
    Pattern As String, _
    Replace As String, _
    vsFindOptionsValue As Integer, _
    <OutAttribute> ByRef Tags As TextRanges _
) As Boolean
bool ReplacePattern(
    TextPoint Point,
    string Pattern,
    string Replace,
    int vsFindOptionsValue,
    out TextRanges Tags
)
bool ReplacePattern(
    [InAttribute] TextPoint^ Point, 
    [InAttribute] String^ Pattern, 
    [InAttribute] String^ Replace, 
    [InAttribute] int vsFindOptionsValue, 
    [InAttribute] [OutAttribute] TextRanges^% Tags
)
abstract ReplacePattern : 
        Point:TextPoint * 
        Pattern:string * 
        Replace:string * 
        vsFindOptionsValue:int * 
        Tags:TextRanges byref -> bool 
function ReplacePattern(
    Point : TextPoint, 
    Pattern : String, 
    Replace : String, 
    vsFindOptionsValue : int, 
    Tags : TextRanges
) : boolean

Parametry

  • Point
    Typ: EnvDTE.TextPoint
    Povinné.Koncový bod zadaný rozsah textu.Úpravy přejděte a Point jsou hranice pro nahrazení.
  • Replace
    Typ: System.String
    Povinné.Náhradní řetězec pro Pattern.
  • Tags
    Typ: EnvDTE.TextRanges%
    Nepovinné.Pokud odpovídající vzorek je regulární výraz obsahující s příznakem sub-expressions, pak Tags obsahuje kolekci TextRange objekty, jednu pro každou tagované vykazovat.

Vrácená hodnota

Typ: System.Boolean
true dojde-li náhradní úspěšně; jinak false.

Poznámky

ReplacePatternVyhledá text, podobně jako na FindPattern, až na to, že hledání textu mezi Úpravy přejděte a argument Point.Chcete-li najít a nahradit v celém dokumentu, použijte TextDocument.ReplacePattern.Tags Kolekce vrátí pouze informace o poslední odpovídající vzorek.

Příklady

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

Zabezpečení rozhraní .NET Framework

Viz také

Referenční dokumentace

EditPoint2 Rozhraní

ReplacePattern – přetížení

EnvDTE80 – obor názvů