四舍五入到有效数字，VB

Question

在vb函数“舍入”中，我希望能够舍入到小数点后一位。 似乎在以下代码中：

圆（[SHAPE_Area] / 10000，1）＆“ ha”

我想四舍五入到小数点后一位，如果小数点后那个地方的值是0，那么它四舍五入到一个整数（即1而不是1.0），我希望将其舍入到1.0。 [SHAPE_Area]字段的类型为“ Double”。 我不确定这对vb舍入功能及其舍入是否有意义。

Answer 1

该数字正确舍入。 数字1与数字1.0相同。

您要格式化数字：

Dim formatted As String = String.Format("{0:N1} ha", SHAPE_Area)

Answer 2

改用.ToString（）和正确的格式字符串 ：

([SHAPE_Area]/10000).ToString("F1") & " ha"