189 8069 5689

vb.net的四舍五入的简单介绍

VB.net,小数点直接进一位的函数?

'自定义一个函数:功能是给小数直接进一位

中卫网站建设公司创新互联,中卫网站设计制作,有大型网站制作公司丰富经验。已为中卫上1000+提供企业网站建设服务。企业网站搭建\外贸营销网站建设要多少钱,请找那个售后服务好的中卫做网站的公司定做!

'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 = a + 1 / (10 ^ n)

End If

End Function

-------------------------

调用一下:

Private Sub Command1_Click()

MsgBox (getNumber(3.1415926, 2))

End Sub

得到3.15

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里四舍五入用什么函数(谢谢)

round是vb6.0的吧,我刚才查了一下,在vb.net里变成了枚举了成员为

成员名称 说明

RoundToBillionth 数字四舍五入为 9 个小数点位。

RoundToHundred 数字四舍五入为百位数。

RoundToHundredMillionth 数字四舍五入为 8 个小数点位

RoundToHundredth 数字四舍五入为 2 个小数点位

RoundToHundredThousand 数字四舍五入为十万位数。

RoundToHundredThousandth 数字四舍五入为 5 个小数点位。

RoundToMillion 数字四舍五入为百万位数。

RoundToMillionth 数字四舍五入为 6 个小数点位

RoundToTen 数字四舍五入为十位数。

RoundToTenBillionth 数字四舍五入为 10 个小数点位

RoundToTenMillionth 数字四舍五入为 7 个小数点位

RoundToTenth 数字四舍五入为 1 个小数点位。

RoundToTenThousand 数字四舍五入为万位数。

RoundToTenThousandth 数字四舍五入为 4 个小数点位。

RoundToThousand 数字四舍五入为千位数。

RoundToThousandth 数字四舍五入为 3 个小数点位。

RoundToUnit 数字四舍五入为个位数。要求


网站名称:vb.net的四舍五入的简单介绍
文章源于:http://cdxtjz.cn/article/dsesshs.html

其他资讯