「VB.NET」Roundで浮動値を指定小数の桁数に返す

2022年2月2日

書式
Public Shared Function Round (value As Double, digits As Integer,
mode As MidpointRounding) As Double
パラメーター
value 丸め対象の倍精度浮動小数点数。
digits 戻り値の小数部の桁数。
戻り値
丸められた digits 小数部の桁数を持つ数値 value 。
value の小数部の桁数が digits よりも少ない場合、value がそのまま返されます。
使用例

Public Sub Main()
    Dim cftA As Double = 6.789
    Dim cftB As Double = -6.789

    '戻り値の小数部の桁数 2桁
    Dim result As Double = Math.Round(cftA, 2)
    Console.WriteLine("結果1: {0,4} = Math.Round({1,5}, 2)", result, cftA)

    '戻り値の小数部の桁数 1桁
    result = Math.Round(cftB, 1)
    Console.WriteLine("結果2: {0,4} = Math.Round({1,5}, 1)", result, cftB)
    
    Console.ReadKey()
End Sub

実行結果
結果1: 6.79 = Math.Round(6.789, 2)
結果2: -6.8 = Math.Round(-6.789, 1)

VB.net

Posted by arkgame