Compartilhar via

Expression.Collection Property

  • Reference

Definition

Namespace:
EnvDTE
Assembly:
EnvDTE.dll
Assembly:
Microsoft.VisualStudio.Interop.dll
Package:
Microsoft.VisualStudio.Interop v17.12.40391

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.

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

    EnvDTE.Expression 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 EnvDTE.Expression = 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

Applies to