vb.net保留两位小数 vb中保留两位小数的函数

如何在VB中实现取小数点后几位的数值?

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")

VB用Format 函数即可实现。

Format 函数，返回 Variant (String)，其中含有一个表达式，它是根据格式表达式中的指令来格式化的。

Print Format(3.1415926, "#.##")

*#：表示一个数字位。#的个数决定了显示区段的长度。如果要显示的数值的位数小于格式字符串指定的区段长度，则该数值靠区段的左端显示。如果要显示的数值的位数大于指定的区段长度，则数值照原样显示。要显示多位，只需要设置数字位数即可，例如：

Print format(3.14159262654321,”#.#######”)

显示：3.1415926

举个例子

Dim a As Decimal = 1.999

Dim b As Decimal = Math.Round(a, 2)

结果为b = 2.00

四舍五入保留两位

private sub text1_change()

text1.text=format(val(text1.text),"0.00")

end sub

分享文章：vb.net保留两位小数 vb中保留两位小数的函数
网址分享：http://myzitong.com/article/doiggjc.html