EditPoint.ReplacePattern(TextPoint, String, String, Int32, TextRanges) Método
Definição
Importante
Algumas informações se referem a produtos de pré-lançamento que podem ser substancialmente modificados antes do lançamento. A Microsoft não oferece garantias, expressas ou implícitas, das informações aqui fornecidas.
Localiza um padrão no intervalo de texto especificado e o substitui pelo texto especificado.
[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
Parâmetros
- Point
- TextPoint
Obrigatórios. O ponto de extremidade do intervalo de texto especificado. O ponto de edição e o ponto são os limites para substituição.
- Pattern
- String
Obrigatórios. A cadeia de caracteres a ser localizada.
- Replace
- String
Obrigatórios. A cadeia de caracteres de substituição para o padrão.
- vsFindOptionsValue
- Int32
Opcional. Uma vsFindOptions constante que indica o tipo de pesquisa a ser executada.
- Tags
- TextRanges
Opcional. Se o padrão correspondente for uma expressão regular contendo subexpressões marcadas, as marcas conterá uma coleção de TextRange objetos, uma para cada subexpressão marcada.
Retornos
true se a substituição ocorrer com êxito; caso contrário, false .
- Atributos
Exemplos
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
Comentários
ReplacePattern localiza o texto de forma semelhante a FindPattern , exceto que ele pesquisa apenas o texto entre o ponto de edição e o argumento Point . Para localizar e substituir em todo o documento, use ReplacePattern . A Tags coleção retorna apenas informações para o último padrão correspondente.