Option Explicit

Private Sub Command1_Click()
Dim a As Single
a = 100.1 - 100
Text1 = a
End Sub

把a定义为Double……结果居然……

论坛里已经发现2个这个原因导致的问题了。

精确度高反而得到的不是准确值！

我觉得数在内存中保存最终是2进制形式，而二进制对小数是不能精确表示的。某个小数数据是由2^(-1),2^(-2),……,2^(-n)里面这些二进制能表示的小数加起来的，所以产生的误差。

刚才对0.5，0.25，0.125，0.0625……等

只要能用m个是2^n次方的数就都没有问题了……比如0.75=0.25+0.5=1/2+1/4即2^(-1)+2^(-2)

所以2楼的结论应该就是原因了。所以大家处理数据的时候不是越大越好，选择适合的范围以减少或者避免误差。

我的意思，数据范围确定不是那么高，不要用DOUBLE否则简单的计算都会出错。
100.1-100这种……

跟MS什么关系！  机器只认识2进制！这个问题要改变那么要大变革了！

VAL返回的是DOUBLE类型的数据……

中间用个single变量过渡，或者CSng转成single