Expression2.Collection Property

Definition

Namespace:

EnvDTE100

Assembly:

Microsoft.VisualStudio.Interop.dll

Package:

Microsoft.VisualStudio.Interop v17.11.40262

Gets the collection containing the object supporting this property or contained within this code construct.

public:
 property EnvDTE::Expressions ^ Collection { EnvDTE::Expressions ^ get(); };

[System.Runtime.InteropServices.DispId(202)]
public EnvDTE.Expressions Collection { [System.Runtime.InteropServices.DispId(202)] get; }

[<System.Runtime.InteropServices.DispId(202)>]
[<get: System.Runtime.InteropServices.DispId(202)>]
member this.Collection : EnvDTE.Expressions

Public ReadOnly Property Collection As Expressions

Property Value

Expressions

An Expressions collection.

Implements

Collection

Attributes

DispIdAttribute

Examples

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();  

    EnvDTE100.Expression2 exp = dte.Debugger.GetExpression("a", true, 1);  
    EnvDTE.Expressions exps = exp.DataMembers;  
    owp.OutputString("\nExpression count: " + exps.Count);  
    owp.OutputString("\nEdition of the environment: " + exps.DTE.Edition);  
    owp.OutputString("\nThe name of the current program: " +   
                     exps.Parent.CurrentProgram.Name);  
    owp.OutputString("\nSecond expression: " + exps.Item(2).Name);  
}  

Shared Sub Collection(ByRef dte As EnvDTE.DTE)  
    Dim exp As EnvDTE100.Expression2 = dte.Debugger.GetExpression("a", True, 1)  
    Dim exps As EnvDTE.Expressions = exp.DataMembers  
    Dim str As String = vbCrLf  
    str = "Expression count: " + exps.Count.ToString()  
    str += vbCrLf + "Edition of the environment: " + exps.DTE.Edition  
    str += vbCrLf + "The name of the current program: " + _  
           exps.Parent.CurrentProgram.Name  
    str += vbCrLf + "Second expression: " + exps.Item(2).Name  
    MessageBox.Show(str, "Expression Test - Collection Property")  
End Sub