將指定的數值採四捨五入至指定的小數位
dValue | Double | 8 | 必須 | (無) | 要捨入的雙精度浮點數。 |
digits | Integer | 4 | 可省略 | 0 | 在傳回值中的有意義之數字 (精確度) 的數目。 |
傳回倍精度變數
Debug.WriteLine(MyRound(12505, -3)) ' 傳回 13000 Debug.WriteLine(MyRound(11505, -3)) ' 傳回 12000 Debug.WriteLine(MyRound(86.5, 0)) ' 傳回 87 Debug.WriteLine(MyRound(0.115, 2)) ' 傳回 0.12 Debug.WriteLine(MyRound(0.125, 2)) ' 傳回 0.13
在系統內建的 Round 函數會將 5 進位至最接近的整數,並非數學上的四捨五入,一般來說,計算機概論均有論及如何做四捨五入計算,故以此自訂函數為例。
.Net framework 2.0 新增旗標 mode As MidpointRounding 可指定 5 的進位方式,請參考線上手冊。
Visual Studio .Net 2002 以後相容版本 | MathTool.vb
|