Foxtable(狐表)用户栏目专家坐堂 → [求助]这个是怎么回事?明明相等!!!


  共有1069人关注过本帖树形打印复制链接

主题:[求助]这个是怎么回事?明明相等!!!

帅哥哟,离线,有人找我吗?
viking
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:371 积分:3120 威望:0 精华:0 注册:2013/7/13 15:49:00
[求助]这个是怎么回事?明明相等!!!  发帖心情 Post By:2017/2/26 22:47:00 [只看该作者]

Dim sr As Double = DataTables("明细账").Compute("sum(收入)","[流水编号] = 'R1702000114'")
Dim zc As Double = DataTables("明细账").Compute("sum(支出)","[流水编号] = 'R1702000114'")
Output.Show(sr)
Output.Show(zc)
Dim ye As Double = sr - zc
Output.Show(ye)
Dim rt As DataRow = DataTables("日记账").Find("[流水编号] = 'R1702000114'")
Dim ls As Double = rt("支出")
Output.Show(ls)
Dim ye1 As Double = ye + ls
Output.Show(ye1)
Dim sz111 As Double = -988.83 + 988.83
Output.Show(sz111)
Dim sz2 As Double = ye * -1
Output.Show(sz2)
If sz2 <> ls Then
    Output.Show("不等")
Else
    Output.Show("相等")
End If

执行结果:
2666.33
3655.16
-988.83
988.83
1.13686837721616E-13
0
988.83
不等


红色的结果,程序怎么的出来的?
好像是格式问题!
求指路!!!!

 回到顶部
帅哥哟,离线,有人找我吗?
有点色
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/2/26 23:54:00 [只看该作者]


 回到顶部