提问：单精度类型数据完成数学运算后如何使结果保留小数点后3位？（附代码）

Question

定义以下代码：
Dim j&
Dim sca!
Dim x!
x = j * (126 / 480) * sca
如给变量j和sca赋值，显示的x值有时会显示到小数点第4位，如希望只显示到第3位，有什么办法可以解决？
谢谢了！

Answer 1

Dim j& 
Dim sca! 
Dim x! 
x = j * (126 / 480) * sca 
'再加一句
x=int(x*1000)/1000 '如果X=0.7304  会显示 X=0.73
'或
x=format(x,"0.000")'如果X=0.7304  会显示 X=0.730

Answer 2

round(x,3)  四舍六入五留双