Project.Collection Property

Definition

Namespace:

EnvDTE

Assembly:

Microsoft.VisualStudio.Interop.dll

Package:

Microsoft.VisualStudio.Interop v17.13.40008

Gets the Projects collection containing the Project object supporting this property.

C++

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

Property Value

Projects

A Projects collection.

Attributes

DispIdAttribute

Examples

VB

Public Sub CodeExample(ByVal dte As DTE2)   
    Try  
        ' Open a project before running this sample.  
        Dim prj As Project = dte.Solution.Projects.Item(1)  
        Dim prjs As Projects  
        Dim msg2 As String = "Global Variables:"  
        Dim msg As String  
        msg = "FileName: " + prj.FileName  
        msg += vbCrLf + "FullName: " + prj.FullName  
        msg += vbCrLf + "Project-level access to " + prj.CodeModel.CodeElements.Count.ToString() + " CodeElements through the CodeModel"  
        prjs = prj.Collection  
        msg += vbCrLf + "There are " + prjs.Count.ToString() + " projects in the same collection."  
        msg += vbCrLf + "Application containing this project: " + prj.DTE.Name  
        If prj.Saved Then  
            msg += vbCrLf + "This project has not been modified since the last save."  
        Else  
            msg += vbCrLf + "This project has been modified since the last save."         
        End If  
        msg +=  vbCrLf + "Properties:"  
        Dim prop As [Property]  
        For Each prop In  prj.Properties  
            msg += vbCrLf + "  " + prop.Name  
        Next prop  
        Dim s As String  
        For Each s In  CType(prj.Globals.VariableNames, Array)  
            msg2 += vbCrLf + "  " + s  
        Next s  

        MessageBox.Show(msg, "Project Name: " + prj.Name)  
        MessageBox.Show(msg2)  
    Catch ex As Exception  
        MessageBox.Show(ex.Message)  
    End Try  
End Sub  

Applies to