VB.Net使用CInt转型非整数值时需要注意的问题

今天帮客户维护一个VBNet项目时遇到的问题 以前没注意过在此记录下来提醒不知道的朋友注意

摘自MSDN

将一个非整数值转换为整型时整数转换函数（CByteCIntCLngCSByteCShortCUIntCULng 和 CUShort）将移除小数部分并将该值捨入为最接近的整数

如果小数部分正好是 整数转换函数将其捨入为最接近的偶数整数例如 捨入为 和 都捨入为 这有时称为四捨六入五成双其目的是弥补在将许多这样的数字相加时可能会累积的偏量 ConsoleWriteLine(CInt())

ConsoleWriteLine(CInt())

ConsoleWriteLine(CInt())

ConsoleWriteLine(CInt())

ConsoleWriteLine(CInt())

ConsoleWriteLine(CInt())