作业帮 > 综合 > 作业

在vb中如何实现数字的运算后保留三位小数,但不要求数据四舍五入.

来源:学生作业帮 编辑:作业帮 分类:综合作业 时间:2024/05/10 23:37:13
在vb中如何实现数字的运算后保留三位小数,但不要求数据四舍五入.
例如数字为1.2568运算后只保留前三位及为1.256
这个较简单,我给你一个函数:XiaoShu(保留小数前的原始数值,保留位数)调用方法如下:假设你的数字存在变量A中,现在要将A中的数字保留三位小数(不四舍五入)放入B中,则Dim A as Single, B as SingleA = 1.2568B=XiaoShu(A,3)Print A & "保留3位小数点的结果是(不四舍五入) " & B从输出B的值可以看到,已经是三位数了(没有进位).下面的函数复制到你的vb代码的最后即可:Function XiaoShu(ByVal a As Single, b As Long) As Single  a = CStr(a)  XiaoShu = Left(a, InStr(1, a, ".") + b)End Function