VB 数据包的问题,很简单的.

vb6.0中
我使用UDP协议
向111.111.111.111每发送一个数据包,它就会回复我4个不同内容的数据包
可是我用这个方法显示数据包的时候,只能显示最后一个包的内容:

Sub Winsock1_DataArrival(ByVal bytestotal As Long)
  Winsock1.GetData receive
  Command1.Enabled = True
  Text1.Text = Chr(receive(1))
End Sub

怎么样让它把每个数据包都储存起来,
比如111.111.111.111回复我的数据包1就存入BAO1
回复的数据包2就存入BAO2
怎么做?
变量BAO应该为什么类型?String行吗?

Text1.Text = Chr(receive(1))
这样的话，每次都会重新赋值，自然最后就只剩最后一次的结果了。

换成：
Text1.Text =Text1.Text+ Chr(receive(1))

--- theforever_csdn @ csdn.net ------
Here I am .