第一个是运算精度问题，vb给的答案没有错误，浮点数本来就是不是精确的，
ss = 0.199999999895226E-02
和
ss=0.2 可以认为都是正确的。

第二个问题是你自己的错误
ss = 400*1000 当然会溢出
正确写法是
ss = 400.0*1000.0
或者
ss = 400# * 1000#

basic是弱类型语言会自动进行转换没错，但是转换的方式有规律可循的，你也总结了是因为超过了Int16。所以问题在于你用错误的方式去执行这个运算。

ss = 400*100000 不出现问题也相当正常100000这个常量显然超越了Int16的范围。

to:tinyfool
事实上,这些值并是不可预期的,事实上我也是使用转换类型的方法解决该问题,但涉及到一个责任划分和分工的问题,我觉得,这种问题不应该是VB程序员职责所在.
"ss = 400*1000 当然会溢出"为何是"当然"?起码.NET中不会溢出,这是内部处理机制的问题
想起我以前的一个项目,有程序员包装了一个Grid控件,只有鼠标在上面转几个圈,程序就异常退出,原因后来查明,是程序捕获鼠标事件,导致溢出,我们是否应该让用户记住这一点,使用时避免移动鼠标呢?还是修改我们的程序?
OOP很重要的一点就是责任划分,我是这样看待这个问题的

这里存在字面常量的问题。像400，1000，在VB6种是Int16型字面常量，而在C#/VB.NET中是Int32型字面常量。所以在后者中就不会溢出了。
其实是C#/VB.NET中问题产生的条件更难了，并不是就不存在了。正如你后面的例子一样。字面常量的类型是应当指定的，这在VB6,C#或VB.NET中都有完美的语法支持。
至于第一个问题……二进制浮点数无法准确表示0.02，0.02在二进制浮点数中是个循环小数。

事实上是可以预期的。
我很遗憾你得到了这样的结论。

第一个：我想大部分的编程入门手册都会告诉我们浮点数的精度问题，以及浮点数不能精确表示所有实数的问题，这个是很基础的东西。为什么不应该直接比较两个浮点运算结果等等，这些都是很基础的知识。你用其他语言的浮点运算，也会得到类似的结果
int main()
{
double ss;
ss = 194268.02 - 194268;
return 0;
}
这样的程序你在vc里面跟踪一下，结果是类似的。

第二个：我已经说了，弱类型语言是会自动转换，但是有规律。你的做法违反了规律当然会发生错误。任何语言都有自己的规定（包括一些隐含的），你违反了规定，当然会出现错误。
这里你的实验也可以稍微揭示一下这个转换的规律。

另外，如果需要处理的异常，不去处理，出现问题那当然是程序员的责任。
-----------------------------
我希望你把你的好奇心和精力放在更有意思的地方。比如第一个问题，如果你好好去看看关于浮点数存储的方式，或者自己用比较底层的方式实现一个浮点数加减法，你就会明白，为什么在浮点运算里面194268.02 – 194268居然不完全等于1.2 - 1（实际上，一般是用两个运算结果的差值是都小于一个足够小的数，来判断相等与否的）。这个实验做了以后，你会对浮点数有更深刻的认识。

第二个问题，你可以通过一系列的类似试验得知，vb的自动转换规则。虽然你刚才在抱怨这个转换规则达不到你的要求，但是实际上，转换规则是在效率，已经最大程度减少二义性的前提下的一个折中的结果。正像很多技术都是折中的结果一样。

眼误，我看成了你说不可预期，我同意这些是可以预期的。
而且这些大部分都是手册可以找到的规则，实际上印象中msdn是包括了对vb怎么对数值进行自动转换的顺序和规律的文档的。

浮点数的问题和编译器相关度很高。可以说是比较复杂的。但是，作为一个程序员，如果你都不了解你的编译器，不了解你的操作系统，那么你还做什么开发呢？只负责画界面？

感谢tinyfool和Niputer!

哈哈，两位又来发镖啦。 ；）

关于这个什么数啊数的，不如用python好了，新版2.4刚刚实现长整数和普通整数的自动转换，保证不会像vb挖个陷阱让你跳。

BASIC的数据类型后缀还是很有趣的，我至今习惯把$符号当作字符串。

以前的MS BASIC还要注意MS浮点和IEEE浮点之间的区别，似乎也会遭成运算误差来的，忘了，是怎么回事来着？

VB已经很厉害了，这样的语句都能写
Dim x As Double = "3" * 4
MsgBox(x)

用VB搞东西的对底层还是不熟啊.至少理解方式,思维方式不一致.
这些东西如果让搞汇编的来看,肯定觉得是天经地义的事情吧

是呀，我学过汇编，确实觉得是天经地义

哦.对于第一个问题.如果你想得到0的答案.可以这么做

CDEC(DOUBLE1)-CDEC(DOUBLE2) 就可以了.

这样会自动纠正浮点错误的.

哦.还是我.

没有仔细看.不过 CDEC 是纠正浮点错误.你的答案是 0.02 呵呵.抱歉

dim ss as double

ss = 194268.02 – 194268

小弟也遇到过这个问题，不过按照小弟的经验

ss.ToString()

的值又会是0.02

不知何解

嘿嘿,从某种观点上来看,就是工具不合适,反而怪用的人不好.
手档车自然操作起来容易,但是开自动档的有愿意研究手档怎么开的吗?

^_^,Pretty Good!

^_^,Pretty Good!

数据类型的BUG还是???ooeess

数据类型的BUG还是???ooeess

dim ss as double

ss = 194268.02 – 194268

肉眼可以判断结果为0.02,而VB中计算的结果:ss = 0.199999999895226E-02
(这里应该是打错了) 应该是:1.99999999895226E-02

public dataid as string,dataid_l%,dataid_R%
dataid="x90x10"
dataid_l = Asc(Mid(dataid, 1, 1))
dataid_r = Asc(Mid(dataid, 2, 1))
MsgBox "正在接收..." & Right(Hex(dataid_l), 2) & Right(Hex(dataid_r), 2), vbOKOnly, "接收"



为什么显示出来的是正在接收...7839

恳求各位大侠指点。