Freigeben über


VCProjectReference.ReferencedProject-Eigenschaft

Ruft oder legt den Zeiger auf das Projekt als den ausgewählten Projektverweis festgelegt.

Namespace:  Microsoft.VisualStudio.VCProjectEngine
Assembly:  Microsoft.VisualStudio.VCProjectEngine (in Microsoft.VisualStudio.VCProjectEngine.dll)

Syntax

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

Eigenschaftswert

Typ: System.Object
Ein Zeiger auf das Projekt als dem ausgewählten Projektverweis.

Hinweise

Ein VCProject-Objekt.

Beispiele

Weitere Informationen finden Sie unter Gewusst wie: Kompilieren von Beispielcode für die Erweiterbarkeit des Visual C++-Codemodells Informationen zum Ändern dieses Beispiel kompiliert und ausgeführt wird.

' 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

.NET Framework-Sicherheit

Siehe auch

Referenz

VCProjectReference Schnittstelle

Microsoft.VisualStudio.VCProjectEngine-Namespace