这应该适合你.它需要引用c:\ windows\system32\tlbinf32.dll,但我认为这没关系,因为它不是第三方组件.
Imports TLI 'from c:\windows\system32\tlbinf32.dll
Dim reglib As TLI.TLIApplication = New TLI.TLIApplicationClass()
Dim DLLPath As String = "c:\mycomponent.ocx"
MsgBox(reglib.TypeLibInfoFromFile(DLLPath).GUID.ToString())
Run Code Online (Sandbox Code Playgroud)
归档时间: |
|
查看次数: |
7992 次 |
最近记录: |