Arrays 如何在vb6中定义字节数组并用Winsock发送

Arrays 如何在vb6中定义字节数组并用Winsock发送,arrays,vb6,Arrays,Vb6,在c中,它看起来像: Byte[] ulaznipodaci = new Byte[] { 0x08, 0x3F, 0x20, 0x03, 0x00, 0x00, 0x05, 0x00 }; sck.Send(ulaznipodaci); 我需要vb6中的这种代码。我试过: Dim ulaznipodaci() As Byte ulaznipodaci = Array(&H8, &H3F, &H20, &H3, &H0, &H0, &H5

在c中,它看起来像:

Byte[] ulaznipodaci = new Byte[] { 0x08, 0x3F, 0x20, 0x03, 0x00, 0x00, 0x05, 0x00 };
sck.Send(ulaznipodaci);
我需要vb6中的这种代码。我试过:

Dim ulaznipodaci() As Byte
ulaznipodaci = Array(&H8, &H3F, &H20, &H3, &H0, &H0, &H5, &H0)
Winsock2.SendData ulaznipodaci
但是这段代码在ulaznipodaci=Array&H8、&H3F、&H20、&H3、&H0、&H0、&H5、&H0行上给了我一个错误

说明:运行时错误“13”: 类型不匹配

我搜索了谷歌,但什么也没找到。请帮忙,我是vb6的新手。
提前感谢。

在VB6中,您必须定义数组的边界,然后分别填充每个项目:

Dim ulaznipodaci(7) As Byte 
'// VB6 array is zero based unless you specify lower to upper bounds

ulaznipodaci(0) = &H8
ulaznipodaci(1) = &H3F
ulaznipodaci(2) = &H20
ulaznipodaci(3) = &H3
ulaznipodaci(4) = &H0
ulaznipodaci(5) = &H0
ulaznipodaci(6) = &H5
ulaznipodaci(7) = &H0
如果以后需要添加更多项目:

ReDim Preserve ulaznipodaci(8)

ulaznipodaci(8) = &H0

。。或者,例如,存储在字符串中,然后循环读取

St=&H8、&H3F、&H20、&H3、&H0、&H0、&H5、&H0

对于i=1到N

位置=i-1*6'点& ulaznipodacii=中间,位置,4'我们不需要,还有一个空间


接下来是关于另一个游戏作弊机器人项目,不是吗?