十年网站开发经验 + 多家企业客户 + 靠谱的建站团队
量身定制 + 运营维护+专业推广+无忧售后,网站问题一站解决
举个例子
创新互联建站专业为企业提供枞阳网站建设、枞阳做网站、枞阳网站设计、枞阳网站制作等企业网站建设、网页设计与制作、枞阳企业网站模板建站服务,10年枞阳做网站经验,不只是建网站,更提供有价值的思路和整体网络服务。
dim
a
as
decimal
=
1.999
dim
b
as
decimal
=
math.round(a,
2)
结果为b
=
2.00
四舍五入保留两位
方法一:
用Round函数,语法 :
ROUND(number,num_digits)
Number 需要进行四舍五入的数字。 Num_digits 指定的位数,按此位数进行四舍五入。
示例:
'Round(需要修改的数字,小数位数)
Print Round(3.1415926, 3)
显示:3.142
方法二:
用Format函数,返回Variant(String),其中含有一个表达式,它是根据格式表达式中的指令来格式化的。
语法
Format(expression[,format[,firstdayofweek[,firstweekofyear]]])
Format函数的语法具有下面几个部分:
示例:
'Round(需要修改的数字,小数位数)
Print format (3.1415926, "#,###")
显示:3.142
方法三:
1、打开VB6.0软件,新建一个标准exe工程;
2、在设计界面上新建一个Command控件;
3、双击Command1控件,进入代码编辑界面,输入代码:
Private Sub Command1_Click()
Dim res As Double
res = Format(1 / 3, "0.000")
Print res;
End Sub
4、运行工程,单击按钮,可以看到数据被保留三位小数;
5、总结,想要保留几位小数,直接设置即可,如想设置保留5位小数,设置如下:
format(1/3,"0.00000")
举个例子
Dim a As Decimal = 1.999
Dim b As Decimal = Math.Round(a, 2)
结果为b = 2.00
四舍五入保留两位