共用方式為


VCProject.CanAddActiveXReference 方法

取得值,這個值表示是否加入指定的 ActiveX (COM) 參考。

命名空間:  Microsoft.VisualStudio.VCProjectEngine
組件:  Microsoft.VisualStudio.VCProjectEngine (在 Microsoft.VisualStudio.VCProjectEngine.dll 中)

語法

'宣告
Function CanAddActiveXReference ( _
    typeLibGuid As String, _
    majorVersion As Integer, _
    minorVersion As Integer, _
    localeID As Integer, _
    wrapper As String _
) As Boolean
bool CanAddActiveXReference(
    string typeLibGuid,
    int majorVersion,
    int minorVersion,
    int localeID,
    string wrapper
)
bool CanAddActiveXReference(
    [InAttribute] String^ typeLibGuid, 
    [InAttribute] int majorVersion, 
    [InAttribute] int minorVersion, 
    [InAttribute] int localeID, 
    [InAttribute] String^ wrapper
)
abstract CanAddActiveXReference : 
        typeLibGuid:string * 
        majorVersion:int * 
        minorVersion:int * 
        localeID:int * 
        wrapper:string -> bool
function CanAddActiveXReference(
    typeLibGuid : String, 
    majorVersion : int, 
    minorVersion : int, 
    localeID : int, 
    wrapper : String
) : boolean

參數

  • typeLibGuid
    類型:String

    表示型別程式庫 GUID 的字串。

  • majorVersion
    類型:Int32

    表示主要版本號碼的整數。

  • minorVersion
    類型:Int32

    表示次要版本號碼的整數。

  • localeID
    類型:Int32

    表示地區設定 ID 的整數。

  • wrapper
    類型:String

    表示包裝函式名稱的字串。 可以是空白。

傳回值

類型:Boolean
如果將加入指定的 ActiveX 參考則為 true,否則為 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

.NET Framework 安全性

請參閱

參考

VCProject 介面

Microsoft.VisualStudio.VCProjectEngine 命名空間