Find2.Execute 方法

定义

执行基于为对象设置的选项的搜索 Find

public:
 EnvDTE::vsFindResult Execute();
public:
 EnvDTE::vsFindResult Execute();
EnvDTE::vsFindResult Execute();
[System.Runtime.InteropServices.DispId(17)]
public EnvDTE.vsFindResult Execute ();
[<System.Runtime.InteropServices.DispId(17)>]
abstract member Execute : unit -> EnvDTE.vsFindResult
Public Function Execute () As vsFindResult

返回

vsFindResult

一个 vsFindResult 常数。

实现

属性

示例

Sub ExecuteExample()  
   Dim objTextDoc As TextDocument  
   Dim objEditPt As EditPoint  
   Dim iCtr As Integer  
   Dim objFind As Find  

   ' 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")  
   objEditPt = objTextDoc.StartPoint.CreateEditPoint  
   objFind = objTextDoc.DTE.Find  

   ' Insert ten lines of text.  
   For iCtr = 1 To 10  
      objEditPt.Insert("This is a test." & Chr(13))  
   Next iCtr  

   ' Set the find options.  
   objFind.Action = vsFindAction.vsFindActionReplaceAll  
   objFind.Backwards = False  
   objFind.FilesOfType = "*.txt"  
   objFind.FindWhat = "test"  
   objFind.KeepModifiedDocumentsOpen = True  
   objFind.MatchCase = False  
   objFind.MatchInHiddenText = False  
   objFind.MatchWholeWord = True  
   objFind.PatternSyntax = vsFindPatternSyntax.vsFindPatternSyntaxLiteral  
   objFind.ReplaceWith = "NEW THING"  
   objFind.ResultsLocation = vsFindResultsLocation.vsFindResultsNone  
   objFind.SearchPath = "c:\temp"  
   objFind.SearchSubfolders = False  
   objFind.Target = vsFindTarget.vsFindTargetCurrentDocument  
   ' Perform the Find operation.  
   objFind.Execute()  
End Sub  

注解

如果搜索操作是异步的(如 "查找全部"),则该 FindDone 事件将在操作完成时发生。 任何其他查找或替换操作都不会出现这种情况,因为 "查找全部" 是唯一的异步查找操作。

适用于