请教USHORT型数组如何合并存储为single数组？

[lucifer1982]

把ushort10个数据的数组存储为single5个元素的数组


例如ushort(0)与ushort(1)合并存储为single(0)



感谢各位帮忙

[兔子-顾问]

Dim u2() As UShort = {16122, 17052} '定义数组
Dim buf(3) As Byte '保存的字节数组
Array.Copy(BitConverter.GetBytes(u2(0)), 0, buf, 0, 2) '依次转换并复制到数组
Array.Copy(BitConverter.GetBytes(u2(1)), 0, buf, 2, 2) '依次转换并复制到数组
Console.Write(BitConverter.ToSingle(buf, 0)) '转换为浮点数