Partager via


_DTE.ActiveDocument, propriété

Obtient le document actif.

Espace de noms :  EnvDTE
Assembly :  EnvDTE (dans EnvDTE.dll)

Syntaxe

'Déclaration
ReadOnly Property ActiveDocument As Document
    Get
Document ActiveDocument { get; }
property Document^ ActiveDocument {
    Document^ get ();
}
abstract ActiveDocument : Document
function get ActiveDocument () : Document

Valeur de propriété

Type : EnvDTE.Document
Objet Document.

Notes

Le document actif est celui qui a le focus. Pour activer un autre document, placez le focus sur sa fenêtre.

Vous ne pouvez définir la légende que dans les fenêtres Outil. Si vous essayez de définir la légende dans d'autres types de fenêtres, telles que des fenêtres de document, le message d'erreur "Erreur non spécifiée" s'affiche.

Exemples

Sub ActiveDocumentExample()
  Dim objTextDoc As TextDocument
  Dim objEP As EditPoint
  
  'Create a new text document.
  Call DTE.ItemOperations.NewFile("General\Text File")
  'Get a handle to the new document.
  Set objTextDoc = DTE.ActiveDocument.Object("TextDocument")
  Set objEP = objTextDoc.StartPoint.CreateEditPoint
  'Create an EditPoint and add some text.
  objEP.Insert "A test sentence."
End Sub

Sub DocumentExample()
  Dim doc As Document
  Dim desc As String

  Set doc = DTE.ActiveDocument
  desc = "You are editing a "
  If (doc.ReadOnly) Then
    desc = desc & "read-only"
  Else
    desc = desc & "writable"
  End If
  desc = desc & " document called " & doc.Name & " located at " & doc.Path
  MsgBox desc
End Sub

Sécurité .NET Framework

Voir aussi

Référence

_DTE Interface

EnvDTE, espace de noms