2010-01-02 2 views

ответ

2
Dim result as Int32 

result = BitConverter.ToInt32(bytearray, 4) 
1
Public Function ByteArrayToInteger(ByRef ByteArray() As Byte, ByRef StartIndex As Integer, ByRef EndIndex As Integer) As Integer 
    Dim bSubArray(0 To EndIndex - StartIndex) As Byte 
    For i As Integer = StartIndex To EndIndex 
     bSubArray(i - StartIndex) = ByteArray(i) 
    Next 
    Return BitConverter.ToInt32(bSubArray, 0) 
End Function 

«, назвав его:

Dim b() As Byte = {1, 2, 3, 4, 5, 6} 
Dim x As Integer = ByteArrayToInteger(b, 0, 3) 
+0

к сведению, что для преобразования байтов в целое число нужно по крайней мере, 4 байта для выполнения преобразования или за исключением Ион будет выброшен –

+0

Я знаю, но я думаю, что этот ответ слишком сложный, и выше кажется простым. Это лучший способ сделать это? –

+0

его более гибким с таким образом –

Смежные вопросы