VCProject.AddActiveXReference(String, Int32, Int32, Int32, String) 方法

定义

向项目添加一个 ActiveX (COM) 引用。

public:
 System::Object ^ AddActiveXReference(System::String ^ typeLibGuid, int majorVersion, int minorVersion, int localeID, System::String ^ wrapper);
public:
 Platform::Object ^ AddActiveXReference(Platform::String ^ typeLibGuid, int majorVersion, int minorVersion, int localeID, Platform::String ^ wrapper);
winrt::Windows::Foundation::IInspectable AddActiveXReference(std::wstring const & typeLibGuid, int majorVersion, int minorVersion, int localeID, std::wstring const & wrapper);
[System.Runtime.InteropServices.DispId(842)]
public object AddActiveXReference (string typeLibGuid, int majorVersion, int minorVersion, int localeID, string wrapper);
[<System.Runtime.InteropServices.DispId(842)>]
abstract member AddActiveXReference : string * int * int * int * string -> obj
Public Function AddActiveXReference (typeLibGuid As String, majorVersion As Integer, minorVersion As Integer, localeID As Integer, wrapper As String) As Object

参数

typeLibGuid
String

一个表示类型库 GUID 的字符串。

majorVersion
Int32

一个表示主版本号的整数。

minorVersion
Int32

一个表示次版本号的整数。

localeID
Int32

一个表示区域设置 ID 的整数。

wrapper
String

一个表示包装名称的字符串。 可以为空。

返回

Object

一个表示项目引用的对象。

属性

示例

有关如何编译和运行此示例的信息,请参阅 如何:编译项目模型扩展性的示例代码

AddActiveXReference 根据提供的参数,向项目添加 ActiveX 类型库引用(如果可能)。

Imports EnvDTE  
Imports System.Diagnostics  
Imports Microsoft.VisualStudio.VCProjectEngine  

Public Module Module1  
    Sub Test()  
        Dim prj As VCProject  
        Dim tlguid, wrapper As String  
        Dim majver, minver, lcid As Integer  

        ' Add the following values:  
        ' tlguid = The guid for the EnvDTE COM type library.  
        ' wrapper = The wrapper name for EnvDTE, taken from .vcxproj file.  
        ' majver, minver = The major and minor versions of DTE,   
        '                  taken from the .vcxproj file.  
        ' lcid = The localization ID. 1033 is English.   
        '        Each language has its own LCID.  
        tlguid = "{80CC9F66-E7D8-4DDD-85B6-D9E6CD0E93E2}"  
        wrapper = "primary"  
        majver = 7  
        minver = 0  
        lcid = 1033  
        prj = DTE.Solution.Projects.Item(1).Object  
        If prj.CanAddActiveXReference(tlguid, majver, minver, lcid, _  
          wrapper) Then  
            prj.AddActiveXReference(tlguid, majver, minver, lcid, wrapper)  
        Else  
            MsgBox("Cannot add the specified ActiveX typelib reference.")  
        End If  
    End Sub  
End Module  

注解

获取此方法的参数的一种方法是向项目添加所需的引用,保存该项目,然后检查其 .vcxproj 文件。 参数在 "ActiveXReference" 下列出。

适用于