Language.Collection Eigenschaft

Definition

Ruft die Auflistung mit dem Objekt ab, das diese Eigenschaft unterstützt oder das in diesem Codekonstrukt enthalten ist.Gets the collection containing the object supporting this property or contained within this code construct.

public:
 property EnvDTE::Languages ^ Collection { EnvDTE::Languages ^ get(); };
[System.Runtime.InteropServices.DispId(202)]
public EnvDTE.Languages Collection { [System.Runtime.InteropServices.DispId(202)] get; }
[<System.Runtime.InteropServices.DispId(202)>]
[<get: System.Runtime.InteropServices.DispId(202)>]
member this.Collection : EnvDTE.Languages
Public ReadOnly Property Collection As Languages

Eigenschaftswert

Languages

Eine Languages-Auflistung.A Languages collection.

Attribute

Beispiele

Im folgenden Beispiel wird die Verwendung der- Collection Eigenschaft veranschaulicht.The following example demonstrates how to use the Collection property.

public static void Collection(DTE dte)  
{  
    // Setup debug Output window.  
    Window w = (Window)dte.Windows.Item(EnvDTE.Constants.vsWindowKindOutput);  
    w.Visible = true;  
    OutputWindow ow = (OutputWindow)w.Object;  
    OutputWindowPane owp = ow.OutputWindowPanes.Add("Collection Property Test");  
    owp.Activate();  

    EnvDTE.Language language = dte.Debugger.Languages.Item(1);  
    owp.OutputString("Number of items in the language collection is " +   
                     language.Collection.Count + ": ");  
    foreach(EnvDTE.Language lang in language.Collection)  
        owp.OutputString(lang.Name + "  ");  
    owp.OutputString("\nEdition of the environment: " + language.DTE.Edition);  
    owp.OutputString("\nThe name of the current program: " +   
                     language.Parent.CurrentProgram.Name);  
}  
Shared Sub Collection(ByRef dte As EnvDTE.DTE)  
    Dim language As EnvDTE.Language = dte.Debugger.Languages.Item(1)  
    Dim str As String = vbCrLf  
    str = "There are " + language.Collection.Count.ToString()  
    str += " items in the language collection: "  
    For Each lang As EnvDTE.Language In language.Collection  
        str += lang.Name + "  "  
    Next  
    str += vbCrLf + vbCrLf + "Edition of the environment: " + _  
           language.DTE.Edition  
    str += vbCrLf + vbCrLf + "The name of the current program: " + _  
           language.Parent.CurrentProgram.Name  
    MessageBox.Show(str, "Language Test - Collection Property")  
End Sub  

Gilt für: