Question

在学习VB时遇到一个问题，具体情况在问题补充里面，盼各位赐教!谢谢

Dim m_Num1 as Double
Dim m_Num2 as Double
Dim m_Num3 as Double
Dim m_Num4 as Double
Dim m_Num5 as Double
m_Num1=190.9
m_Num2=3.8
m_Num3=0
m_Num4=m_Num1+m_Num2+m_Num3
m_Num5=194.7
if m_Num4<m_Num5 then
msgbox "Wrong"
else
msgbox "Right"
end if
注释：本来m_Num4和m_Num5都等于194.7
为什么弹出的对话框却是Wrong呢？？
不好意思，
if m_Num5<m_Num4 then
msgbox "Wrong"
else
msgbox "Right"
end if
本来m_Num4和m_Num5都等于194.7
为什么弹出的对话框却是Wrong呢？？

Answer 1

兄弟 你这个是不是只是程序的一部分?
如果你单独用这个肯定应该是回复 right 的!

Answer 2

输出的结果就是right
是不是程序录入时出错了？

Answer 3

我试了下，是right，不是wrong，不知道你怎么搞的 。

我又按照你补充的试了下，确实如你所说。我在立即窗口输出两者相减的结果，发现不是0，而是-2.8421709430404E-14 ，给你提供两种解决方案：
1. 将变量类型改为single类型；
2. 用format格式化数据