VCProject.AddActiveXReference 方法
向项目添加 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
类型：System.String
一个表示类型库 GUID 的字符串。
- majorVersion
类型：System.Int32
一个表示主版本号的整数。
- minorVersion
类型：System.Int32
一个表示次版本号的整数。
- localeID
类型：System.Int32
一个表示区域设置 ID 的整数。
- wrapper
类型：System.String
一个表示包装名称的字符串。可以为空。
返回值
类型：System.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 安全性
- 对直接调用方的完全信任。此成员不能由部分信任的代码使用。有关更多信息，请参见通过部分受信任的代码使用库。