次の方法で共有

Find.Action Property

  • Reference

Definition

Namespace:
EnvDTE
Assembly:
EnvDTE.dll
Assembly:
Microsoft.VisualStudio.Interop.dll
Package:
Microsoft.VisualStudio.Interop v17.11.40262

Gets or sets how to find, such as find next match, find all, replace and find, and so forth.

public:
 property EnvDTE::vsFindAction Action { EnvDTE::vsFindAction get(); void set(EnvDTE::vsFindAction value); };
public:
 property EnvDTE::vsFindAction Action { EnvDTE::vsFindAction get(); void set(EnvDTE::vsFindAction value); };
[System.Runtime.InteropServices.DispId(3)]
public EnvDTE.vsFindAction Action { [System.Runtime.InteropServices.DispId(3)] get; [System.Runtime.InteropServices.DispId(3)] set; }
[<System.Runtime.InteropServices.DispId(3)>]
[<get: System.Runtime.InteropServices.DispId(3)>]
[<set: System.Runtime.InteropServices.DispId(3)>]
member this.Action : EnvDTE.vsFindAction with get, set
Public Property Action As vsFindAction

Property Value

vsFindAction

A vsFindAction constant representing the type of find action to take.

Attributes
DispIdAttribute

Examples

Sub ActionExample()  
   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

Applies to