[VB.NET]Ceilingで小数第1位で切り上げる
書式
1.Public Shared Function Ceiling (a As Double) As Double
指定した倍精度浮動小数点数以上の数のうち、最小の整数値を返します。
2.Public Shared Function Floor (d As Double) As Double
指定した倍精度浮動小数点数以下の数のうち、最大の整数値を返します。
使用例
Module Module1 Sub Main() 'Double型配列 Dim cftArr() As Double = {8.03, 9.64, 0.32, -0.42, -9.1, -5.6} Console.WriteLine(" Value Ceiling Floor") Console.WriteLine() 'for each文で配列の要素ををCeiling、Floor関数を使用 For Each value As Double In cftArr Console.WriteLine("{0,7} {1,16} {2,14}", _ value, Math.Ceiling(value), Math.Floor(value)) Next Console.ReadKey() End Sub End Module
結果
Value Ceiling Floor 8.03 9 8 9.64 10 9 0.32 1 0 -0.42 0 -1 -9.1 -9 -10 -5.6 -5 -6