UC知道vb中如何在字节数组中取浮点数？
来源：百度知道 编辑：UC知道 时间：2024/05/22 08:41:10
在vb中声明了一个512个字节数组
dim aa（511） as byte
这个数组是从磁盘中读的数据，全是4个字节一组的浮点数
然后有一个声明一个128的single 数组
dim bb(128) as single
然后到aa里取数，可是vb没有指针我怎么才能按四位一组在aa中把数据取出来对应到bb上呢！有没有小程序。
沙发这位朋友能不能说详细点
Dim i As Integer
For i = 0 To UBound(aa) Step 4
………………自己加处理代码~
Next i
这我还是没法赋值，怎么能把single数组和byte数组互相赋值啊。说白了就是让他们共享一段内存地址。
dim aa（511） as byte
这个数组是从磁盘中读的数据，全是4个字节一组的浮点数
然后有一个声明一个128的single 数组
dim bb(128) as single
然后到aa里取数，可是vb没有指针我怎么才能按四位一组在aa中把数据取出来对应到bb上呢！有没有小程序。
沙发这位朋友能不能说详细点
Dim i As Integer
For i = 0 To UBound(aa) Step 4
………………自己加处理代码~
Next i
这我还是没法赋值，怎么能把single数组和byte数组互相赋值啊。说白了就是让他们共享一段内存地址。
Private Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" (Destination As Any, Source As Any, ByVal Length As Long)
Dim aa(511) As Byte
Dim bb(127) As Single
'从磁盘中读入数据到aa
'....
CopyMemory bb(0), aa(0), 512
'现在bb数组可以使用了
Dim i As Integer
For i = 0 To UBound(aa) Step 4
………………自己加处理代码~
Next i
这位仁兄，我只是跟你探讨一下我的方法，我也没有试过：
1.首先定义好：
Dim aa(512) as byte
dim bb(128) as single
2.你把aa（512）这个数组用采用二进制方式存储在计算机的没个地方。
3.然后在用二进制方式把它打开，读入到bb(128)中。
我想这方法应该是可以的。如果可以实现，给我加分哦.....