UDP局域网广播只有一台设备收到数据
    With Winsock2(0)
            .Close
            .Protocol = sckUDPProtocol
            .RemoteHost = "255.255.255.255"
            .RemotePort = 23
            .Bind 23, "192.168.0.201"
        End With

一是反复发送，第二是检查其他机器是否有防火墙，有就关闭。