VCReference.Reference Propriedade

Definição

Obtém a referência associada a essa configuração.

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

Valor da propriedade

Object

Um objeto que representa a referência associada a essa configuração.

Atributos

Exemplos

Consulte como compilar código de exemplo para extensibilidade de modelo de projeto para obter informações sobre como compilar e executar este exemplo.

' 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  

Aplica-se a