vb.net - VB.NET 中的 'List(Of Byte())' 到 'Byte()'

Question

我有一个字节列表：

Public Function GenPackets()
    Dim Stream As NetworkStream = ConnectionSocket.GetStream()
    Dim DataList As New List(Of Byte())
    Dim Data As Byte()
    DataList.Add(IntegerToByte(My.Settings.BotUID))

    ' TO DO       Stream.Write(Data, 0, 3)
    Return Data
End Function

如何将DataList其所有字节转换为单个 Byte() 以用于Stream.Write？

Answer 1

无需转换您的数据，只需遍历列表：

For Each buffer As Byte() In Datalist
    yourStream.Write(buffer)
Next

这比首先连接所有单独的数组以创建一个大数组要有效得多。

Answer 2

正如 Konrad Rudolph 已经写的那样，您不需要为了将其写入流中而将数据展平。

为了完整起见，您可以像这样展平数据列表

Dim dataList As New List(Of Byte())
Dim data As Byte()

data = dataList.SelectMany(Function(x) x).ToArray()

或者使用 LINQ 语法

data = (From bytes In dataList From x In bytes Select x).ToArray()

Answer 3

你可以做ListBytes 而不是数组：

Dim DataList As New List(Of Byte)
DataList.AddRange(IntegerToByte(My.Settings.BotUID))

Data = DataList.ToArray()