通过

VCActiveXReference.TypeLibraryName 属性

  • 项目

获取 ActiveX (COM) 类型库引用的名称。

命名空间：  Microsoft.VisualStudio.VCProjectEngine
程序集：  Microsoft.VisualStudio.VCProjectEngine（在 Microsoft.VisualStudio.VCProjectEngine.dll 中）

语法

声明
ReadOnly Property TypeLibraryName As String

string TypeLibraryName { get; }

property String^ TypeLibraryName {
    String^ get ();
}

abstract TypeLibraryName : string with get

function get TypeLibraryName () : String

属性值

类型：System.String
表示类型库引用名称的字符串。

备注

除非引用是 ActiveX (com) 类型库，此属性返回一个空字符串。

有关如何编译和运行此示例的信息，请参见如何：编译 Visual C++ 代码模型扩展性的示例代码。

示例

[Visual Basic]

此示例通过在解决方案中的每个项目周期并列出该类型的每个 ActiveX (com) 控件库名称。

' Add a reference to Microsoft.VisualStudio.VCProjectEngine and have a 
' Visual C++ project loaded before running this example. Also, you 
' should have at least one ActiveX (COM) reference in a project.
Imports EnvDTE
Imports Microsoft.VisualStudio.VCProjectEngine

Public Module Module1
    Sub Test()
        Dim proj As Project
        Dim vcproj As VCProject
        Dim ref As VCReference
        Dim axref As VCActiveXReference
     
        On Error Resume Next

        ' Loop each project in the solution.
        For Each proj In DTE.Solution.Projects
            vcproj = Nothing
            vcproj = CType(proj.Object, VCProject)
            ' If this project is a Visual C++ project.
            If Not vcproj Is Nothing Then
                ' Loop the references for this Visual C++ project.
                For Each ref In vcproj.VCReferences
                    axref = Nothing
                    axref = CType(ref, VCActiveXReference)
                    ' If this reference is an ActiveX reference.
                    If Not axref Is Nothing Then
                        MsgBox("Type library name: " & _
                          axref.TypeLibraryName)
                    End If
                Next
            End If
        Next
    End Sub
End Module

.NET Framework 安全性

请参见

参考

VCActiveXReference 接口

Microsoft.VisualStudio.VCProjectEngine 命名空间