以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  四舍五入，不足补零  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=185946)
--  作者：237756360
--  发布时间：2023/3/27 13:09:00
--  四舍五入，不足补零
如何做到保留4位小数四舍五入，不足补零

Output.Show(Round2(3.44, 1))

想要输出为：3.4400



进阶：

如何做到”动态“保留N位小数四舍五入，不足补零

Dim N As Integer = 3

Output.Show(Round2(3.44, N))

想要输出为：3.440


[此贴子已经被作者于2023/3/27 13:09:22编辑过]
--  作者：有点蓝
--  发布时间：2023/3/27 13:42:00
--  
除非转换为字符串，数值不可能后面带0的。

Output.Show(format(3.44, "0.0".PadRight(N +2, "0")))
[此贴子已经被作者于2023/3/27 13:44:24编辑过]