Class Sample Public Shared Sub Main() Dim bytes() As Byte = { Byte.MinValue, 14, 122, Byte.MaxValue} Dim result As UInteger For Each byteValue As Byte In bytes result = Convert.ToUInt32(byteValue) Console.WriteLine(result) Next End Sub End Class