vb.net - VB.net 方法的返回值。System.__Com.object

Question

我知道这是一个愚蠢的问题，但我找不到有关它的信息。

Public Function TestFunc() As String

        Dim lMapper = cRouter.StaticPortMappingCollection
        Dim lMappedPort As NATUPNPLib.IStaticPortMapping
        Dim Test As String

        Test = lMapper.Add(80, "UDP", 8080, "192.168.1.100", True, "Local Web Server").ToString
        MsgBox(Test)
End Function

lMapper.Add 将返回类似此处 S_OK 等的内容 -> http://msdn.microsoft.com/en-us/library/aa366148(v=vs.85).aspx

如何获得这个值？以我的方式，我得到 *System.__ComObject* ;[

非常感谢您的回答。

Answer 1

您只需要将它转换为这样的 IStaticPortMapping

 lMappedPort  = DirectCast(lMapper.Add(80, "UDP", 8080, "192.168.1.100", True, "Local Web Server"), IStaticPortMapping)