vb点虐 取小数位数 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点虐 怎么设置数字保留小数点位数

举个例子

Dim a As Decimal = 1.999

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

结果为b = 2.00

四舍五入保留两位

vb点虐 怎样使计算结果只保留四位小数？

用这个函数把

Math.Round 方法 (Decimal, Int32)

将小数值舍入到指定精度。

命名空间： System

程序集： mscorlib（在 mscorlib.dll 中）

语法

Visual Basic（用法）

Dim d As Decimal

Dim decimals As Integer

Dim returnValue As Decimal

returnValue = Math.Round(d, decimals)

参数

d

类型：System.Decimal

要舍入的小数。

decimals

类型：System.Int32

返回值中的小数位数（精度）。

返回值

类型：System.Decimal

精度等于 decimals，最接近 d 的数字。

Math.Round(3.4666666, 4) 结果是 3.4667.

vb点虐 如何保留三位非零数

方法如下：

方法一：

保留三位整数：

Dim X As Single

X = Val(InputBox("输入一个任意实数！"))

Print Format(X, "000")

保留三位小数：

Dim X As Single

X = Val(InputBox("输入一个任意实数！"))

Print Format(X, ".000")

方法二：

用Format函数，比如通过text输入，转换后在窗体打印：Private Sub Command1_Click()

n = Text1.Text

t = Format(n, "000.###")

Print t

End Sub