在字节数组中向右移动字节的方式

Question

我有一个巨大的数组，我需要的是能够在自定义的字节长度上向右移动数组的位置也应该是自定义的，例如:

Dim data() As Byte = {0, 128, 0, 4, 9, 9, 32, 0, 0, 0, 0, 0, 0, 0, 0}

我想在4字节内移动第四个元素，并用零填充它(所以它看起来像在数组中插入字节):

Dim data() As Byte = {0, 128, 0, 0, 0, 0, 0, 4, 9, 9, 32, 0, 0, 0, 0, 0, 0, 0, 0}

What have i try:

Dim data(200) As Byte
Dim data_shifted(400) As Byte
For b As Integer = 200 To 3 Step -1
data(b) = data_shifted(b - 3)
Next

这个不适合我，因为它只能移动第一个字节，我不能选择自定义数组位置我正在寻找stack。push ()但是不知道怎么在这里使用

Answer 1

使用

Array.Copy(data, beginAtIndx, data_shifted, beginAtIndxShift, shiftLength)

三个参数(除了数组)都表示Integer变量