为什么 vb 减法会错误。。。。。。
text1=1138.15
text2=1139.3
Private Sub Command1_Click()
MsgBox Val(Text1) - Val(Text2)
End Sub
这计算结果 应该是1.15
而我这电脑出来的结果是 -1.14999999999986
这个正常,因为计算机是以二进制存储值的,不信你直接
debug.print 1139.3-1138.15
结果也是
1.14999999999986
看看你的开发需求,如能四舍五入取近似值就取一下吧
这是电脑符点运算精度问题。建议指定数据精度，你可以使用format函数指定小数位数，这样，系统会自动进行四舍五入的计算。
有些十进制小数在浮点数中没有对应的表示，只能近似表示。不过至少7位以内是精确的。你把它四舍五入到7位吧。
用专门算钱的Currency计算吧,应该是为了应用目的,MS也不会让用它来算这个有误差的:)
输出结果:
Currency: 1.15
Single: 1.150024
Decimal: 1.15
Double: 1.14999999999986
直接量: 1.14999999999986
VB code:
Option Explicit
Private Sub Form_Load()
TestJian
End Sub
'---------------------------------------------------------------------------------------
' 过程名 : TestJian
' 时间 : 2010-3-4 21:45
' 作者 : 杨过.网狐.cn
' 功能 : http://topic.csdn.net/u/20100304/21/d13424de-a610-40dc-9740-2cd6b9d328b7.html?seed=1167179594&r=63715104#r_63715104
' 说明 : 为什么 vb 减法会错误。。。。。。
相关问答：
为什么工具栏按扭的宽度改变不了,在属性里改了又变成原来的数值了
大胡子真厉害，回答基本都是爆料级的
大胡子升级真快啊，这才几天就5条短裤外加月排名第一了
想想我这5个短裤混了差不多8年才得到的。
回复 ......
vb中 现在我要把数据库里存储的一个附件的内容替换了，怎么做，只是替换我指定的位置，不是全部替换
请将问题说明白，存储字段格式，如果是Binary格式的比较麻烦，如果是字串，直接替换。最好不要进行指定位置替换� ......
数据库里有一个字段的内容是二进制，怎么才能把这个二进制读出来
使用字节流对象可以实现
例如现在数据库里有个字段的内容是0x504B03040A0000000800407F263C3B02465390000000820000000A0000006273CECACCE22E7478 ......
如题，VB中如何实现一PC控制N台PC机的开关机或者其他命令呢？
这个问题有点大哦.如不能在其它机器上也装程序的话,那只要看他们有没配置有远程控制开关机了
如果是那种客户/服务端的方式 ，就是被控制PC也需要安� ......
