用winsock怎样接收？？

我用winsock发送a(1)-a(20):
for i＝1 to 20
 winsock(index).sendata a(i)
next i
在接收端dataarrival事件中这样写:
winsock.getdata strdata Vbstring
redim a(x)
a(x)=strdata
x=x+1
结果在a（1）中收到的不是原来发送的a（1），而是a(1)到a（20）其中的一部分
也就是说，好像20个数组一起传出来，结果等到接收缓冲区满了以后才赋予a（x）
请问怎样才可以分别收到a（x)？？