首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > VB >

vb怎么byte数组转成integer

2013-03-12 
vb如何byte数组转成integer有一个4字符的byte数组byte(){122,218,152,240}有什么函数能转成int类型的?转成

vb如何byte数组转成integer
有一个4字符的byte数组byte(){122,218,152,240}
有什么函数能转成int类型的?转成int后是10017402
java中可以这么做,vb里有类似的函数吗?或该怎么实现?
[解决办法]

Dim a(3) As Byte
Dim b As Long
a(0) = 122
a(1) = 218
a(2) = 152
a(3) = 0
b = CLng(a(0)) + CLng(a(1)) * 256& + CLng(a(2) * 65536) + CLng(a(3)) * 16777216
Debug.Print b '10017402

[解决办法]

Private Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" (Destination As Any, Source As Any, ByVal Length As Long)
  Dim a(3) As Byte
  Dim b As Long
    a(0) = 122
    a(1) = 218
    a(2) = 152
    a(3) = 0
    Call CopyMemory(b, a(0), 4)
    Debug.Print b

[解决办法]
使用copymemory API函数,如果byte的字节顺序为低字节在前

热点排行