如何在Visual Basic中保留一定数量的数字

时间:2014-09-26 20:20:43

标签: vb6

我正在尝试显示一个双精度数,因此小数点后总是有4位数。例如,一个double是0.0182,另一个是0.0180。但是,当double以0结尾时会出现问题,这会导致截断零并留下0.018。我试图在我的数字末尾添加一个零来解决这个问题,但是收到语法错误。

Dim minFeature As Double

...

minFeature = Round(minFeature, 4) ' keep only 4 digits of precision. works.
minFeature = CDbl(CStr(minFeature).PadRight(1, "0")) ' add on an extra 0. does not work.

1 个答案:

答案 0 :(得分:3)

这会将数字作为字符串返回,并保留四位小数。

Format(minFeature, "0.0000")

有关详细信息,请参阅docs on Format()