VB.NET 数组转浮点数据

 简易版本来了

函数：

 Private Function Fun_ByteToFp32(ByVal gao As Byte, ByVal zhonggao As Byte, ByVal zhongdi As Byte, ByVal di As Byte) As Single
        Dim byt(4) As Byte
        byt(3) = gao
        byt(2) = zhonggao
        byt(1) = zhongdi
        byt(0) = di
        Return System.BitConverter.ToSingle(byt, 0)
End Function

 实现代码：

MsgBox(" 数据转换1：" & Fun_ByteToFp32(&H41, &H45, &HBE, &H77))

结果：

参考链接：http://t.csdn.cn/TnsCX