从Bitarray（不是字节数组）复制到另一个Bitarray

Question

我需要从Bitarray（不是字节数组）复制到另一个Bitarray。 Bitarray1.CopyTo(Bitarray2, 26)无法正常工作，执行此操作的正确方法是什么。

Answer 1

CopyTo（destinationArray，StartIndex）如果你放26它将尝试复制，从第26位开始，你必须使用0（基本上是零位的数据）才能从数组的开头获取所有内容 copyTo也只复制到一个数组，让它回到一个bitarray你必须创建一个新的

Dim AnArray as Array     
Bitarray1.CopyTo(anArray, 0) 
Dim BitArray2 As New BitArray(Anarray)

Answer 2

普通的for循环怎么样：

For i As Integer = 0 To Bitarray1.Length - 1
    Bitarray2(i + 26) = Bitarray1(i)
Next