VB保留三
位小数和保 留三位整数 保留三位 小数例如 3334. 4444就 要成为33 34.44 4; 44 44.55 55就要成 为4444 .556; 保留三位 整数例如 10就要成 为010 403就要 是403 9就要是0 09 我看 过用ROU ND做的. 可发现如果 是4.55 为什么结果 就是4.5 5而不是4 .550呢 : 用F ormat 函数,比如 通过tex t输入,转 换后在窗体 打印: P rivat e Sub Comm and1_ Click () n = Tex t1.Te xt t = For mat(n ,'000 .###' ) Pri nt t End S ub小编还为您整理了以下内容,可能对您也有帮助:
vb,通过公式计算得到一个数值,怎样取到小数点后三位,并...
vb,通过公式计算得到一个数值,怎样取到小数点后三位,并...
设你上面的E值要取三位小数点:
【方法一】
E = Round(Sqr((x1 - x11) * (x1 - x11) + (y1 - y11) * (y1 - y11)) / 10000,3)
【方法二】
E = Format(Sqr((x1 - x11) * (x1 - x11) + (y1 - y11) * (y1 - y11)) / 10000,"0.000")
显示三位小数点的作用是,一般主要用于显示的时候才用,中间过程没必要使用的。上面的两个方法其实也是没必要的,因为它是中间过程,这里只是给你看而已。真正使用时如下(假如要在文本框text1显示E值给用户看):
【方法一】
Text1.text= Round(Sqr((x1 - x11) * (x1 - x11) + (y1 - y11) * (y1 - y11)) / 10000,3)
或Text1.text=Round(E,3)
【方法二】
Text1.text== Format(Sqr((x1 - x11) * (x1 - x11) + (y1 - y11) * (y1 - y11)) / 10000,"0.000")
或Text1.text=Format(E,"0.000")下载本文