小弟是第一次使用vb编写网络程序,使用winsock的UDP协议接收二进制数据,发现用getdata方法接收的数据与实际接到的数据大小不一致。连续几天调试都没有进展,眼看程序等着急用,真是急刹我也!望大侠多多指教,小弟感激不尽!附代码如下:
sub Winsock1_DataArrival(BytesTotal)
Dim Buffer() As Byte
ReDim Buffer(BytesTotal)) As Byte
Dim ILONG AS INTEGER
Winsock.GetData Buffer, vbByte, BytesTotal
ILONG=UBOUND(BUFFER)+1
END SUB
ILONG为实际接收到的二进制数据大小,BytesTotal为UDP数据包的大小,应该这两个数值是一致,但是实际操作中ILONG远远小于BytesTotal,BytesTotal的大小一般在100至200字节,接收到的字节数组大小只有几十,不知道是什么原因,请指正!