在vb6中将double分成几部分

Question

我想将一个双部分分成几部分，而不是四舍五入。

尝试使用int和fix，但他们会给出奇怪的结果。

MsgBox Int(17.82 / 1.62) 'gives me 10 but 
MsgBox 17.82 / 1.62 'gives me 11

我想要结果如11，但是如何使用int或fix函数？

Answer 1

首先读到这个： MSDN: Arithmetic Operators in Visual Basic

然后看看：

Private Sub Form_Load()
    MsgBox 17.82 \ 1.62 ' returns 9
    MsgBox 17.82 / 1.62 ' returns 11
End Sub

Answer 2

你问了一招。是的，最简单和最简单的技巧是将红利加0.5，即分子

MsgBox Int((17.82 + 0.5) / 1.62) 'should give 11

仅在您要使用INT功能

时使用此选项