改写后的代码分成两部分:Receiver,用来侦听:PacketInfo,对数据包进行简单的解析.数据包的内容是通过Receiver的DataReceived事件返回来的.每个函数都不长,容易看懂,注释我就--咳咳. Imports System.NetImports System.Net.SocketsImports System.Threading Public Class Receiver Dim buffer As Byte() Dim mvarBufferLength As Integ