如何在VBA的精选案例中停止舍入？

Question

我在VBA中有一个选择案例，用于获取值并从中进行一些数学运算。然后应该在两个不同的单元格中显示求解的值和原始值。当我输入整数作为输入时，它完美地工作。但是，如果我输入1.2（或其他一些小数），它将使用1.2作为数学并给出一个输出的正确值，但对于另一个输出（只显示原始输入）它只是说1（向下舍入）而不是1.2。如何让它显示1.2？谢谢！ （希望这很有意义......）

Answer 1

以下是一个例子：

Sub test()

Dim lng As Long, dbl As Double, itg As Integer

itg = 24.53
lng = 24.53
dbl = 24.53

MsgBox lng & " " & " " & dbl & " " & itg

End Sub

如果您运行此代码，它将显示一个带有25 24.53 25的消息框 只有声明为Double的变量才会保留小数 因此，您只需要使用正确的数据类型声明您的变量，以免省略小数 希望这会有所帮助。