我怎样才能产生精确的十进制值

Question

代码：

将 mp 调暗为十进制

mp = 2056834 / 36 MsgBox(mp, vbInformation)

Output：57134.2777777778

我期待 output 是：

Output：57134.27777777778

为什么它缺少小数点应该是什么问题？

Answer 1

尝试这个：

Dim mp As Decimal

mp = Math.Round(CDec(2056834) / CDec(36), 11)
MsgBox(mp, vbInformation)

这将产生预期的 output： 57134.27777777778