[VB.NET]VB6写的DLL在vb.net中怎么调用啊 谢谢

来源:互联网 发布:kmeans算法的优缺点 编辑:程序博客网 时间:2024/04/28 22:02
VB.NET源码-156个实用实例哦……<script type="text/javascript"><!--google_ad_client = "pub-8333940862668978";/* 728x90, 创建于 08-11-30 */google_ad_slot = "4485230109";google_ad_width = 728;google_ad_height = 90;//--></script><script type="text/javascript"src="http://pagead2.googlesyndication.com/pagead/show_ads.js"></script>
VB6写的DLL在vb.net中怎么调用啊 谢谢
使用VB6编写的DLL在VB中调用如下:

dim Myobj as new CMD_LAB.MD5
dim RetStr as string
RetStr =Myobj.GetMD5( "生成特别的MD5编码 ")

.Net 中想继续使用这个DLL。不希望通过 "引用 "来调用!

Imports System.Reflection

Dim Mtypec As Type
Dim Mobject As Object

Mtypec = Type.GetTypeFromProgID( "CMD_LAB.MD5 ")

If Mtypec Is Nothing Then
Mobject = Nothing
Else
Mobject = Activator.CreateInstance(Mtypec)
RetStr = Mtypec.InvokeMember( "GetMD5 ", BindingFlags.InvokeMethod, Nothing, Mobject, ???)
End If

现有如下疑问:
1、怎么使用InvokeMember调用需要参数的方法?
2、怎么得到方法的返回值

谢谢
__________________________________________________________________________
没人知道吗?
__________________________________________________________________________