vb点虐 指定小数位数 vba小数怎么定义

vb点虐 怎么定义小数位数？

举个例子

创新互联建站专业为企业提供枞阳网站建设、枞阳做网站、枞阳网站设计、枞阳网站制作等企业网站建设、网页设计与制作、枞阳企业网站模板建站服务，10年枞阳做网站经验，不只是建网站，更提供有价值的思路和整体网络服务。

dim

a

as

decimal

=

1.999

dim

b

as

decimal

=

math.round(a,

2)

结果为b

=

2.00

四舍五入保留两位

怎么在vb中输出固定小数位数的数字？

方法一：

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

vb点虐 怎么设置数字保留小数点位数

举个例子

Dim a As Decimal = 1.999

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

结果为b = 2.00

四舍五入保留两位