VCReference.Reference Eigenschaft
Definition
Wichtig
Einige Informationen beziehen sich auf Vorabversionen, die vor dem Release ggf. grundlegend überarbeitet werden. Microsoft übernimmt hinsichtlich der hier bereitgestellten Informationen keine Gewährleistungen, seien sie ausdrücklich oder konkludent.
Ruft den Verweis ab, der mit dieser Konfiguration verknüpft ist.
public:
property System::Object ^ Reference { System::Object ^ get(); };
public:
property Platform::Object ^ Reference { Platform::Object ^ get(); };
[System.Runtime.InteropServices.DispId(2015)]
public object Reference { [System.Runtime.InteropServices.DispId(2015)] get; }
[<System.Runtime.InteropServices.DispId(2015)>]
[<get: System.Runtime.InteropServices.DispId(2015)>]
member this.Reference : obj
Public ReadOnly Property Reference As Object
Eigenschaftswert
Ein Objekt, das den zugeordneten Verweis dieser Konfiguration darstellt.
- Attribute
Beispiele
Weitere Informationen zum Kompilieren und Ausführen dieses Beispiels finden Sie unter Gewusst wie: Kompilieren von Beispiel Code für die Erweiterbarkeit von Projekt Modellen .
' Add a reference to Microsoft.VisualStudio.VCProjectEngine.
' This sample displaya the path of each reference in a Visual C++
' project. Therefore, make sure you have a Visual C++ project loaded
' before running this code.
Imports EnvDTE
Imports Microsoft.VisualStudio.VCProjectEngine
Public Module Module3
Sub Test()
Dim proj As Project
Dim vcproj As VCProject
Dim ref As VCReference
Dim vsref As VSLangProj.Reference
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 is a Visual C++ project.
If Not vcproj Is Nothing Then
' Loop each reference in the Visual C++ project.
For Each ref In vcproj.VCReferences
vsref = Nothing
vsref = CType(ref.Reference, VSLangProj.Reference)
' If we have the Visual Studio reference.
If Not vsref Is Nothing Then
MsgBox("The path for reference '" & vsref.Name _
& "' is '" & vsref.Path & "'.")
End If
Next
End If
Next
End Sub
End Module