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等 - ＆gt; http://msdn.microsoft.com/en-us/library/aa366148(v=vs.85).aspx

如何获得此值？按我的方式，我得到* System .__ ComObject *; [

非常感谢您的回答。

Answer 1

您只需将其转换为静态端口映射，就像这样

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

VB.net返回方法的值。系统.__ Com.object

1 个答案: