vb6 - VB6 中的字节数组到有符号整数

Question

我在 VB6 中从字节数组转换为有符号整数时遇到问题。这在 .NET 中使用 BitConverter 很简单，但我不确定如何使用 VB6。 谢谢

Answer 1

不幸的是没有内置函数，你需要写一个。这是一个帮助您入门的快速示例。

Private Function BArrayToInt(ByRef bArray() As Byte) As Integer
    Dim iReturn As Integer
    Dim i As Integer

    For i = 0 To UBound(bArray) - LBound(bArray)
        iReturn = iReturn + bArray(i) * 2 ^ i
    Next i

    BArrayToInt = iReturn

End Function