VB6-动态调用引用DLL中的方法

Question

这个问题与这里的问题几乎相同：动态调用DLL中的方法除了我在VB6中需要它。我记得在某个地方读到VB6支持ActivX模块的反射。

我只想加载一个有效的VB6 DLL，调用一个名为"Say"的方法，并传递一个参数"Hello"。

有人能提供一些与参考问题答案中的示例类似的示例代码吗？

谢谢。

Answer 1

除了亚历克斯的回答，正如Bob所评论的。

Dim Obj As Object: Set Obj = CreateObject("Prog.Id")
' Just Do It! 
' A runtime error will occur if the object does not have a suitable method. 
Obj.Say("Hello")

Answer 2

您可以使用CallByName:

Dim Obj As Object: Set Obj = CreateObject("Prog.Id")
CallByName Obj, "Say", VbMethod, "Hello"

或者Typelib信息库。