remoting问题，提示异常：remoting 未处理serializationException,Invalid type code in stream 'Invalid'..[在线急等]

Dim iTmpData As IntPtr = szRemote.GetMemoryData(EQPFXDEF_MAN)   
szRemote为remoting对象.
提示：remoting 未处理serializationException:Invalid type code in stream 'Invalid'.
请问怎么解决？
下面为连服务与创建remoting对象，没任何问题。
    Dim szRemote As IRemoteObject    Private Sub ConnectServer()
        Dim chan As New TcpChannel
        ChannelServices.RegisterChannel(chan, False)   
        On Error GoTo Handle
        szRemote = CType(Activator.GetObject(GetType(RemoteObjects.IRemoteObject), "tcp://localhost:XXX/XXX"), IRemoteObject)                      
        Exit Sub
Handle:
        MsgBox(Err.Description & "[" & Err.Number & "]", MsgBoxStyle.Exclamation)
    End Sub