主题：[求助]数值框“NumericComboBox”计算出现近似值？

Dim t1 As String = Forms("找零计算").Controls("NumericComboBox1").text
Dim t2 As String = Forms("找零计算").Controls("NumericComboBox2").text
Forms("找零计算").Controls("NumericComboBox3").text = val(t1) - val(t2)

如：

10.1-10=0.0999999999999996

当小数部分的值在0.4-0.7之间时，结果是正确的。