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

定义

获取一个值,该值指示是否要添加给定的 ActiveX (COM) 引用。

public:
 bool CanAddActiveXReference(System::String ^ typeLibGuid, int majorVersion, int minorVersion, int localeID, System::String ^ wrapper);
public:
 bool CanAddActiveXReference(Platform::String ^ typeLibGuid, int majorVersion, int minorVersion, int localeID, Platform::String ^ wrapper);
bool CanAddActiveXReference(std::wstring const & typeLibGuid, int majorVersion, int minorVersion, int localeID, std::wstring const & wrapper);
[System.Runtime.InteropServices.DispId(845)]
public bool CanAddActiveXReference (string typeLibGuid, int majorVersion, int minorVersion, int localeID, string wrapper);
[<System.Runtime.InteropServices.DispId(845)>]
abstract member CanAddActiveXReference : string * int * int * int * string -> bool
Public Function CanAddActiveXReference (typeLibGuid As String, majorVersion As Integer, minorVersion As Integer, localeID As Integer, wrapper As String) As Boolean

参数

typeLibGuid
String

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

majorVersion
Int32

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

minorVersion
Int32

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

localeID
Int32

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

wrapper
String

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

返回

Boolean

true 如果它将添加给定的 ActiveX 引用, false 则为,否则为。

属性

示例

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

CanAddActiveXReference 根据提供的参数,向项目添加 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  

适用于