winsock建立udp聊天程序问题

我知道，应调用winsock.bind 方法

解决方案 »

  1.   

    对呀，bind。    '初始化通信控件
        mLocalIP = SendWinsck.LocalIP
        mRemoteIP = "255.255.255.255"
        mSendPort = 2201
        mRecievePort = 2202
        mLocalName = gLocalName
        '发送端
        With SendWinsck
            .Protocol = sckUDPProtocol
            .LocalPort = mSendPort
            .RemotePort = mRecievePort
            .RemoteHost = mRemoteIP
            .Bind .LocalPort, .LocalIP          '设置只发送数据
        End With
        '接收端
        With RecieveWinsck
            .Protocol = sckUDPProtocol
            .LocalPort = mRecievePort
            .Bind .LocalPort, .LocalIP          '设置只接收数据
        End With