EditPoint.ReplacePattern(TextPoint, String, String, Int32, TextRanges) Метод

Определение

Отыскивает шаблон в указанном фрагменте текста и замещает его на указанный текст.

[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

Параметры

Point
TextPoint

Обязательный. Точка конца заданного диапазона текста. Точка редактирования и точка — это границы для замены.

Pattern
String

Обязательный. Строка, которую нужно найти.

Replace
String

Обязательный. Строка замены для шаблона.

vsFindOptionsValue
Int32

Необязательный параметр. Константа vsFindOptions, указывающая тип выполняемой операции поиска.

Tags
TextRanges

Необязательный параметр. Если сопоставленный шаблон является регулярным выражением, содержащим вложенные выражения с тегами, то теги содержат коллекцию TextRange объектов, по одной для каждой части выражения, заключенного в теги.

Возвращаемое значение

Boolean

Возвращается значение true, если объект успешно заменен. В противном случае возвращается значение false.

Атрибуты

Примеры

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  

Комментарии

ReplacePattern находит текст точно так же FindPattern , за исключением того, что он ищет только текст между точкой редактирования и аргументом Point . Чтобы найти и заменить весь документ, используйте ReplacePattern . TagsКоллекция возвращает только сведения о последнем сопоставленном шаблоне.

Применяется к