推导算法，厉害的进来试试哦！第一个算出来的，给全部分数！

[wxf0204]

例子：
A。 12158.3416 表示为：5E F9 3D 46

B。 3723.2475 表示为：F6 B3 68 45

上面两个例子，推导出规律，给出公式，第一个算出来的，我把分全部给他。

[lertulo]

全是帶星的```

[砸死牛顿的苹果]

单精度是4个字节 即32bit
最高位 表示数的正负 然后8位是指数 再23位是 小数部分
比如
0,01111111,00000000000000000000000
表示1=2^0
0,10000000,00000000000000000000000
表示2=2^1
0,01111110,00000000000000000000000
表示0.5=2^(-1)
假如要表示1.5 先把他分解成 1.5=2^0+2^(-1)=1+0.5
0,01111111,10000000000000000000000
指数部分是以 01111111作为基准0 然后把小数部分进行 向左或者向右位移

[南山明月]

一个十六进制的转化

[东方之珠]

我很差，但还是想进来看一看！

[kuhe]

tiger zhao强人。
我接触VB接近十年了，一直关注过LSET语句，这是头一次看到它的强大功能。
我的解决办法是MemoryCopy，不过还是LSet更好些。

[matsu]

365A3AFC 1BE1B0-DEAD-C259
394C3400 E432DF-C16B-2456
9863E6C2 E80514-E041-0B8A
28522FF6 449A33-D00A-9A49
请强人泰格Zhao试一试

[砸死牛顿的苹果]

365A3AFC==> 3.251886E-06
394C3400==> 1.947433E-04
9863E6C2==> -2.945557E-24
28522FF6==> 1.166774E-14

后面那些 1BE1B0-DEAD-C259 怎么是7个字节?

[Tiger_Zhao]

single 数据类型的内存字节

[Tiger_Zhao]

Option Explicit

Type Value
    v As Single
End Type

Type Bytes
    v(3) As Byte
End Type

Sub Main()
    T 12158.3416
    T 3723.2475
End Sub

Sub T(ByVal v As Single)
    Dim t1 As Value, t2 As Bytes
    Dim i As Long
    
    t1.v = v
    LSet t2 = t1
    For i = 0 To 3
        Debug.Print Right$("0" & Hex(t2.v(i)), 2) & " ";
    Next
    Debug.Print
End Sub

[嗷嗷叫的老马]

哈哈

没份了~~

我也首先想到的是与内存内容有关~

继续飘过~~~~~~~~~~~~~~~~~~~

[matsu]

365A3AFC表示为1BE1B0-DEAD-C259
求394C3400表示为？？？？？？-？？？？-？？？？

[Tiger_Zhao]

LSet 对结构复制要比 CopyMemory 快，而且不会象 CopyMemory 由于参数声明和调用不匹配而出错。

[嗷嗷叫的老马]

飘过