发布网友 发布时间:2022-04-27 05:13
共1个回答
热心网友 时间:2022-06-26 18:54
使用 #import "c:\winnt\system32\tlbinf32.dll" 导入TypeLib information库,该库提供了类来获取一个 active dll中的所有coclass,interface, function, paraments等信息。如果不足道该如何
使用,可以先在VB中做实验。
1 在Project的引用中增加对 TypeLib ,information 库的引用
2 下面是一段示例代码:显示所有的coclass
Dim TLInfo As TypeLibInfo
Set TLInfo = TLI.TypeLibInfoFromFile( "c:\temp\Your.dll")
With TLInfo.CoClasses
For i = 1 To .Count
msgbox .Item(i).name
Next
End With
'显示第一个CoClass的所有接口
With TLInfo.CoClasses.Item(1).interfaces
For i = 1 To .Count
msgbox .Item(i).name
Next
End With
'显示第一个CoClass的第一个接口的的所有函数
With TLInfo.CoClasses.Item(1).interfaces(1).members
For i = 1 To .Count
msgbox .Item(i).name
Next
End With