向项目添加 ActiveX (COM) 引用。
命名空间： Microsoft.VisualStudio.VCProjectEngine
程序集： Microsoft.VisualStudio.VCProjectEngine（在 Microsoft.VisualStudio.VCProjectEngine.dll 中）
语法
声明
Function AddActiveXReference ( _
typeLibGuid As String, _
majorVersion As Integer, _
minorVersion As Integer, _
localeID As Integer, _
wrapper As String _
) As Object
Object AddActiveXReference(
string typeLibGuid,
int majorVersion,
int minorVersion,
int localeID,
string wrapper
)
Object^ AddActiveXReference(
[InAttribute] String^ typeLibGuid,
[InAttribute] int majorVersion,
[InAttribute] int minorVersion,
[InAttribute] int localeID,
[InAttribute] String^ wrapper
)
abstract AddActiveXReference :
typeLibGuid:string *
majorVersion:int *
minorVersion:int *
localeID:int *
wrapper:string -> Object
function AddActiveXReference(
typeLibGuid : String,
majorVersion : int,
minorVersion : int,
localeID : int,
wrapper : String
) : Object
参数
typeLibGuid
类型：String一个表示类型库 GUID 的字符串。
majorVersion
类型：Int32一个表示主版本号的整数。
minorVersion
类型：Int32一个表示次版本号的整数。
localeID
类型：Int32一个表示区域设置 ID 的整数。
wrapper
类型：String一个表示包装名称的字符串。 可以为空。
返回值
类型：Object
一个表示项目引用的对象。
备注
一种获取该方法的参数。项目中添加所需引用，保存项目，然后检查其 .vcxproj 文件。 参数列在“ActiveXReference 下”。
示例
有关如何编译和运行该示例的信息，请参见 如何：编译项目模型扩展性示例代码。
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
.NET Framework 安全性
- 对直接调用方的完全信任。此成员不能由部分信任的代码使用。有关详细信息，请参阅通过部分受信任的代码使用库。