本来我想用字符串数组,可听说字符串变量不能接受二进制数据,必须使用BYTE数据。

解决方案 »

  1.   

    这儿没有VB,有些关键字记不住,只能给你说下思路:    1、定义两个全局变量
           Dim B() As Byte 用来保存数据,
           Dim I As Long 用来记录下标;
           I = -1
        2、接收时
           定义两个局部变量
           Dim BB() As Byte 存放本次取回来的数据,
           Dim II As Long 本次的数据量;
           将本次的数据用BB取回来
           将本次的数据量用II取回来
           ReDim P** B(I+II)         P**是一个VB关键字,用来保护REDIM时B()中原来的数据不丢失
           用一个循环,将BB中的数据逐个追加到B的尾部      ----------------------------------------------- 
          我编了三年程序       只用过VB 
          我用了三年VB         只用过WINSOCK 
          我用了三年WINSOCK    只用过UDP和TCP 
          我用了三年UDP和TCP   原来都用的是TCP/IP协议 
          http://www.offca.com/gps/iphonebbs/
          **********中国网络程序开发联盟欢迎你**********
          -----------------------------------------------
      

  2.   

    Redim Preserve B(I+1) As Byte