References.AddProject メソッド

[アーティクル]
08/22/2008

更新 : 2007 年 11 月

プロジェクトに新しいプロジェクト参照を追加し、新たに作成された Reference オブジェクトを返します。

名前空間 : VSLangProj
アセンブリ : VSLangProj (VSLangProj.dll 内)

構文

'宣言
Function AddProject ( _
    pProject As Project _
) As Reference
'使用
Dim instance As References
Dim pProject As Project
Dim returnValue As Reference

returnValue = instance.AddProject(pProject)

Reference AddProject(
    Project pProject
)

Reference^ AddProject(
    [InAttribute] Project^ pProject
)

function AddProject(
    pProject : Project
) : Reference

パラメータ

pProject
型 : EnvDTE.Project

必ず指定します。追加する Project オブジェクトを指定します。

戻り値

型 : VSLangProj.Reference

解説

このメソッドでは、新しい参照の Identity、Culture、MajorVersion、MinorVersion、BuildNumber、および RevisionNumber がプロジェクトに既に存在している参照と重複している場合でも、エラーは発生しません。この場合、bstrPath パラメータで指定した参照は、既にプロジェクトに追加されています。プロジェクトに既に存在している、同一の参照の ProjectItem が代わりに返されます。

参照の Identity が同じでも、MajorVersion、MinorVersion、BuildNumber、RevisionNumber、または Culture のいずれかが異なる参照がプロジェクトで見つかると、このメソッドはエラーになります。

例

' Macro Editor    
Imports VSLangProj
' Add the second project as a reference to the first project.
Sub AddProjectExample()
   ' First project is a Visual Basic or C# project.
   Dim theVSProject As VSProject = _
      CType(DTE.Solution.Projects.Item(1).Object, VSProject)
        
   ' Second project is any type of project.
   Dim secondProject As Project = DTE.Solution.Projects.Item(2)
        
   ' AddProject returns the newly created Reference object.
   Dim newReference As Reference
   newReference = theVSProject.References.AddProject(secondProject)
End Sub