关于vb中传递二进制数据流的问题？

[sky1940]

我在用socket发送数据的时候，数据包的前四个字节是表示数据包长度的，后面是文本信息，该怎么写呢？

[sky1940]

比如说我
dim len as integer
len=200
len怎么分为四个字节传呢？唉没做过这个，试试太麻烦

[123BMW666]

200,只要用一个字节表示就可以啦。
剩下的三个字节用没有意义的字符代替就行啦!或为空也行啊

[weiweiplay]

Public Sub LongToBIN(ByVal Value As Long, _
b() As Byte, _
ByVal Index As Long, _
ByVal Num As Long)
Dim i As Long

For i = 0 To Num - 1
b(Index + i) = Value Mod &H100
Value = Value \ &H100
Next i
End Sub


dim len as integer
dim b(3) as long
dim i as long
len=200

LongToBIN len,b,0,4

for i = 0 to ubound(b)
debug.print b(i)
next i

[qkaibo]

呵呵 这个问题 一句话说不清楚 不是简单的 这么看

qq 17310603 可以咨询