BitConverter.ToUInt32 returns a 32-bit unsigned integer converted from four bytes
Imports System Imports Microsoft.VisualBasic Module BytesToUInt32Demo Sub BAToUInt32( bytes( ) As Byte, index As Integer ) Dim value As UInt32 = BitConverter.ToUInt32( bytes, index ) Console.WriteLine( value ) End Sub Sub Main( ) Dim byteArray as Byte( ) = { _ 15, 0, 0, 0, 0, 16, 0, 255, 3, 0, _ 0, 202, 154, 59, 255, 255, 255, 255, 127 } BAToUInt32( byteArray, 1 ) End Sub End Module