[VB6 ] 偽高斯計算法問題

看板Visual_Basic作者 (我們要永遠在一起)時間14年前 (2010/05/14 13:02), 編輯推噓4(401)
留言5則, 4人參與, 最新討論串1/2 (看更多)
我想要讓它可以無條件捨去小數點部份 所以使用了下面的方法 我這樣寫的 Private Sub Command1_Click() Label4 = Int(Text1 * 0.06) End Sub 照這樣說~ 他會回傳整數部份給label 但是發現一個問題 當我輸入350時 他卻是回傳出20 不是應該是21嗎?? 請問有高手知道是什麼問題嗎?? 指點我一下吧!!感恩~ -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 210.69.40.253

05/14 16:22, , 1F
Int(Sng(Text1) * 0.06) ...我猜是String的問題...
05/14 16:22, 1F

05/18 10:06, , 2F
應該是VB6的bug吧...
05/18 10:06, 2F

05/19 22:40, , 3F
Int好像是4捨6入吧,用Fix()捨去小數
05/19 22:40, 3F

05/24 15:57, , 4F
用FIX也不行
05/24 15:57, 4F

05/26 23:14, , 5F
那用Round(),這好像是四捨五入
05/26 23:14, 5F
文章代碼(AID): #1BxDbFhT (Visual_Basic)
文章代碼(AID): #1BxDbFhT (Visual_Basic)