作者Emptys (我们要永远在一起)
看板Visual_Basic
标题[VB6 ] 伪高斯计算法问题
时间Fri May 14 13:02:05 2010
我想要让它可以无条件舍去小数点部份
所以使用了下面的方法
我这样写的
Private Sub Command1_Click()
Label4 = Int(Text1 * 0.06)
End Sub
照这样说~
他会回传整数部份给label
但是发现一个问题
当我输入350时
他却是回传出20
不是应该是21吗??
请问有高手知道是什麽问题吗??
指点我一下吧!!感恩~
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 210.69.40.253
1F：推 Marty:Int(Sng(Text1) * 0.06) ...我猜是String的问题... 05/14 16:22
2F：推 ClubT:应该是VB6的bug吧... 05/18 10:06
3F：推 apple0660:Int好像是4舍6入吧，用Fix()舍去小数 05/19 22:40
4F：→ Emptys:用FIX也不行 05/24 15:57
5F：推 apple0660:那用Round()，这好像是四舍五入 05/26 23:14