VCReference.Reference Свойство
Определение
Важно!
Некоторые сведения относятся к предварительной версии продукта, в которую до выпуска могут быть внесены существенные изменения. Майкрософт не предоставляет никаких гарантий, явных или подразумеваемых, относительно приведенных здесь сведений.
Получает ссылку, связанную с данной конфигурацией.
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
Значение свойства
Объект, представляющий ссылку, связанную с этой конфигурацией.
- Атрибуты
Примеры
Сведения о том, как скомпилировать и запустить этот пример, см. в разделе как скомпилировать пример кода для расширения модели проекта .
' 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