vb.net小数进位 vb 小数

VB.NET 怎么样保留后面的小数位保留两位小数的一般方法是四舍五入法 。
保留两位小数,看千分位 。是4或比4小舍去;是5或比5大舍去以后向前一位进1 。
如:3.425保留两位小数就是3.43
3.421保留两位小数就是3.42
又如: 3.4263保留两位小数就是3.43
3.4233保留两位小数就是3.42
再如:3.4保留两位小数就是3.40
vb.net保存小数点后两位,不进位,有无函数?代码分析vb.net小数进位:
Math.Floor:返回小于或等于指定数字的最大整数 。
Fix:返回数字的整数部分 。
Math.Floor 和 Fix 函数都移除 Number 的小数部分并返回得到的整数值 。
Math.Floor 和 Fix 函数之间的区别在于:如果 Number 为负vb.net小数进位,则 Math.Floor 返回小于或等于 Number 的第一个负整数vb.net小数进位,而 Fix 返回大于或等于 Number 的第一个负整数 。例如 , Math.Floor 将 -8.4 转换成 -9,而 Fix 将 -8.4 转换成 -8 。
vb.net小数进位你的要求:如果vb.net小数进位你的要求是直接舍去,那么应当采用Fix方法,考虑到时负数的情况,那么采用Math.Floor将会出现非预期的结果 。
测试结果:见附图 。
欢迎交流 。
VB.net , 小数点直接进一位的函数?'自定义一个函数:功能是给小数直接进一位
'num要操作的小数
'n 保留几位小数,
Function getNumber(num As Double, n As Integer) As Double
Dim a As Double
a = Int(num * (10 ^ n)) / (10 ^ n)
If a = num Then
getNumber = a
Else
getNumber = a1 / (10 ^ n)
End If
End Function
-------------------------
调用一下:
【vb.net小数进位 vb 小数】Private Sub Command1_Click()
MsgBox (getNumber(3.1415926, 2))
End Sub
得到3.15
vb.net小数进位的介绍就聊到这里吧,感谢你花时间阅读本站内容,更多关于vb 小数、vb.net小数进位的信息别忘了在本站进行查找喔 。

    推荐阅读