在winsock控件的send函数中,它的返回值就是实际发送的字节数,你可以通过一个变量获得。

解决方案 »

  1.   

    我刚才试过了,不行(或者是我不会用),我不知道如何将winsock的senddata方法存入一个变量中。请指教!或者有没有其他什么方法可以获得利用winsock控件发送的数据总字节数!谢谢!
      

  2.   

    我也想过这个问题,看来只有通过第一次发送字节数,然后再发送数据来解决.
    dim lenofyourdata as integer  '发送端
    第一次发送数据长度winsock.senddata "DATALENGTH" + lenofyourdata接受端
    dim lenofdata as integer   '接受端
    dim beginreceive as boolean
    beginreceive=false
    ---------------------------------winsock.getdata mydata
    if not beginreceive then
    select case of mid(mydata,1,10)
    case "DATALENGTH"
         lenofdata=strtoint(mid(mydata,11,len(mydata))
         beginreceive=true
    case .....   '其传送指令
    end select
    else
    '那个变量就到了你的这边mydata里去了
    '然后根据len(mydata)就可以知道来了多少数据,自然就知道如何步进你的progressbar了
    end if