Find2.Action Eigenschaft
Definition
Wichtig
Einige Informationen beziehen sich auf Vorabversionen, die vor dem Release ggf. grundlegend überarbeitet werden. Microsoft übernimmt hinsichtlich der hier bereitgestellten Informationen keine Gewährleistungen, seien sie ausdrücklich oder konkludent.
Ruft ab oder legt fest, wie gesucht werden soll, z. B. nächste Übereinstimmung suchen, alle suchen, suchen und ersetzen usw.
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
Eigenschaftswert
Eine vsFindAction-Konstante, die den Typ der Suchaktion darstellt.
Implementiert
- Attribute
Beispiele
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