Partager via


VCProjectReference.ReferencedProject, propriété

Obtient ou définit le pointeur au projet pour la référence de projet sélectionnée.

Espace de noms :  Microsoft.VisualStudio.VCProjectEngine
Assembly :  Microsoft.VisualStudio.VCProjectEngine (dans Microsoft.VisualStudio.VCProjectEngine.dll)

Syntaxe

'Déclaration
ReadOnly Property ReferencedProject As Object
Object ReferencedProject { get; }
property Object^ ReferencedProject {
    Object^ get ();
}
abstract ReferencedProject : Object with get
function get ReferencedProject () : Object

Valeur de propriété

Type : System.Object
Un pointeur au projet pour la référence de projet sélectionnée.

Notes

Objet VCProject.

Exemples

Consultez Comment : compiler l'exemple de code pour l'extensibilité du modèle de code Visual C++ pour plus d'informations sur comment compiler et exécuter cet exemple.

' Add a reference to Microsoft.VisualStudio.VCProjectEngine.
' This sample displays the name of every referenced project in a 
' Visual C++ project in the solution. Therefore, make sure you have a 
' Visual C++ project loaded before running this code.
Imports EnvDTE
Imports Microsoft.VisualStudio.VCProjectEngine

Public Module Module1
    Sub Test()
        Dim proj As Project
        Dim vcproj As VCProject
        Dim ref As VCReference
        Dim projref As VCProjectReference
        Dim refproj As Project

        On Error Resume Next

        ' Loop each project in the solution.
        For Each proj In DTE.Solution.Projects
            vcproj = Nothing
            vcproj = CType(proj.Object, VCProject)
            ' If this project is a Visual C++ project
            If Not vcproj Is Nothing Then
                ' Loop the references for this Visual C++ project.
                For Each ref In vcproj.VCReferences
                    projref = Nothing
                    projref = CType(ref, VCProjectReference)
                    ' If this reference is a project reference.
                    If Not projref Is Nothing Then
                        refproj = Nothing
                        refproj = CType(projref.ReferencedProject, _
                          Project)
                        ' If there is a referenced project.
                        If Not refproj Is Nothing Then
                            MsgBox("Project named '" & refproj.Name & "' _
                              is referenced in project '" & vcproj.Name _
                              & "'.")
                        End If
                    End If
                Next
            End If
        Next
    End Sub
End Module

Sécurité .NET Framework

Voir aussi

Référence

VCProjectReference Interface

Microsoft.VisualStudio.VCProjectEngine, espace de noms