将整数转换为Byte数组VB.net

Question

我有以下Java代码按预期工作,在写入流之前将一些数字转换为字节数组.

byte[] var1 = new byte[]{
    (byte)-95,
    (byte)(240 / 256 / 256 % 256),
    (byte)(240 / 256 % 256),
    (byte)(240 % 256),
    (byte)0
};

我需要在VB .net中编写相同的内容我在VB .net中尝试了以下代码,但没有成功.

Dim var1(4) As Byte
    var1(0) = Byte.Parse(-95)
    var1(1) = Byte.Parse(240 / 256 / 256 Mod 256)
    var1(2) = Byte.Parse(240 / 256 Mod 256)
    var1(3) = Byte.Parse(240 Mod 256)
    var1(4) = Byte.Parse(0)

我做错了吗？如何正确完成它..

谢谢.

Answer 1

您可以使用BitConverter类将整数(32位(4字节))转换为字节数组.

Dim result As Byte() = BitConverter.GetBytes(-95I)

Dim b1 As Byte = result(0) '161
Dim b2 As Byte = result(1) '255
Dim b3 As Byte = result(2) '255
Dim b4 As Byte = result(3) '255