请问VB.net 如何实现 指定端口到指定端口 发送数据

[MANSOBOY]

请问如何实现 指定端口到指定端口 发送数据！
例如： 要求由本机的 5541 端口 发送 数据包到 计算机A 的 7740 端口！！
应该如何实现？？？
谢谢！！！

[MANSOBOY]

谢谢！！

[llsus]

发送：

        Try
            Dim bytes(1024) As Byte
            Dim s = New Socket(AddressFamily.InterNetwork, SocketType.Stream, ProtocolType.Tcp)
            Dim localEndPoint As New IPEndPoint(IPAddress.Parse("127.0.0.1"), 5541)
            s.Connect(localEndPoint)
            s.Send(Encoding.Unicode.GetBytes("你要发送的数据！"))
            s.Close()
        Catch ex As Exception
        End Try
    End Sub

接收，建议在线程中接收，这里只写方法

        s = New Socket(AddressFamily.InterNetwork, SocketType.Stream, ProtocolType.Tcp)
        Dim localEndPoint As New IPEndPoint(IPAddress.Parse("127.0.0.1"), 1024)
        s.Bind(localEndPoint)
        s.Listen(100)
        While (True)
            Dim bytes(1024) As Byte
            Dim ss As Socket = s.Accept()
            ss.Receive(bytes)
            'msgbox( Encoding.Unicode.GetString(bytes))  '这里显示数据
        End While

[llsus]

上面接收方的端口写错了，写7740 ，不是1024

[MANSOBOY]

谢谢。。此问题已经解决