获取或设置一个指示执行 Replace 操作后修改的文档是否仍保持打开状态的值。
命名空间:  EnvDTE
程序集:  EnvDTE(在 EnvDTE.dll 中)
语法
声明
Property KeepModifiedDocumentsOpen As Boolean
    Get
    Set
bool KeepModifiedDocumentsOpen { get; set; }
property bool KeepModifiedDocumentsOpen {
    bool get ();
    void set (bool value);
}
abstract KeepModifiedDocumentsOpen : bool with get, set
function get KeepModifiedDocumentsOpen () : boolean
function set KeepModifiedDocumentsOpen (value : boolean)
属性值
类型:System.Boolean
true 表示修改的文档仍保持打开;false 表示已关闭修改的文档。
备注
KeepModifiedDocumentsOpen 默认为最后使用的全局查找状态。
示例
Sub KeepModifiedDocumentsOpenExample()
   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
.NET Framework 安全性
- 对直接调用方的完全信任。此成员不能由部分信任的代码使用。有关更多信息,请参见通过部分受信任的代码使用库。